32 점 나침반은 ... 흥미 롭습니다.

_{작성자 : Denelson83 (자체 작품) [ GFDL 또는 CC-BY-SA-3.0 ], 위키 미디어 공용}

당신의 도전은 정도를 측정하여 32 포인트 나침반의 방향으로 변환하는 것입니다.

각 방향은 이전보다 11.25 (360/32) 더 먼 거리입니다. 예를 들어, N (북쪽)은 0도, NbE (북쪽 동쪽)는 11.25도, NNE (북동쪽)는 22.5도 등입니다.

지시를받는 방법은

• 0 도는 N, 90 도는 E, 180 도는 S, 270 도는 W입니다.

  • 이것을 기본 방향이라고합니다.

• 기본 방향 사이의 중간 지점은 단순히 연결된 기본 방향입니다. N 또는 S가 항상 먼저 가고 W 또는 E가 항상 두 번째입니다.

  • 이것을 서수 방향이라고합니다.

• 기본 방향과 서수 방향 사이의 중간 지점은 다시 연결되는 방향이며 그 사이에 "-"가 있습니다. 기본 방향이 먼저, 서수로 두 번째로 이동합니다.

  • 이를 2 차 심혈관 방향이라고합니다.

• 이차-심근 간 방향과 다른 방향 사이의 중간 지점은 가장 가까운 기본 방향 (물론 바로 옆에있는 것 이외의 다른 방향)에 의한 다른 방향입니다.

  • 나는 이것이 무엇인지 모른다.

이 모든 설명이 나의 뇌만큼 상처를 입히면이 차트를 참조하십시오.

1   North               N
2   North by east       NbE
3   North-northeast     NNE
4   Northeast by north  NEbN
5   Northeast           NE
6   Northeast by east   NEbE
7   East-northeast      ENE
8   East by north       EbN
9   East                E
10  East by south       EbS
11  East-southeast      ESE
12  Southeast by east   SEbE
13  Southeast           SE
14  Southeast by south  SEbS
15  South-southeast     SSE
16  South by east       SbE
17  South               S
18  South by west       SbW
19  South-southwest     SSW
20  Southwest by south  SWbS
21  Southwest           SW
22  Southwest by west   SWbW
23  West-southwest      WSW
24  West by south       WbS
25  West                W
26  West by north       WbN
27  West-northwest      WNW
28  Northwest by west   NWbW
29  Northwest           NW
30  Northwest by north  NWbN
31  North-northwest     NNW
32  North by west       NbW

다음은 나침반의 요점에 대한 자세한 차트와 가능한 더 나은 설명입니다.

도전 과제는 각도로 입력하고 약어와 함께 해당 나침반 방향의 전체 이름을 출력하는 것입니다.

테스트 사례 :

Input  Output
0      North N
23.97  North-northeast NNE
33.7   Northeast by north NEbN
73.12  East-northeast ENE
73.13  East by north EbN
219    Southwest by south SWbS
275    West W
276    West by north WbN
287    West-northwest WNW

테스트 사례에서와 같이 모든 대문자를 유지해야합니다. 소수점의 최대 수는 2. 모든 입력 숫자가 0으로 동일하고, 소수점이 존재하는 적은 경우, 360보다 (당신이 처리 할 수없는 양쪽에 자리가있을 것보다 더 큰 것입니다 .1또는 1.).

이것은 code-golf 이므로 바이트 단위의 가장 짧은 코드가 이깁니다.

펄 250 236 231 188 187

편집 : @bazzargh 솔루션에서 본 것처럼 대칭을 악용하는 일부 바이트

+ 편집 : 그리고 몇 가지 악한 속임수 ...

+ 편집 : 내가 시작한 곳으로 돌아가고 (문자열이 아닌 목록으로 작업) 더 많은 대칭 = 1 바이트를 사용하고 훨씬 추악합니다.

$_=((@_=(1,@_=qw(1b3 1-13 13b1 13 13b3 3-13 3b1),3,map{y/1/2/r}reverse@_)),map{y/312/421/r}@_)[int<>/11.25+.5];print ucfirst s/\w/(' by ',north,south,east,west)[$&]/ger,' ',y/1-4-/NSEW/dr

예쁜 인쇄 :

$_=(
    (@_=
        (
            1,
            @_=qw(1b3 1-13 13b1 13 13b3 3-13 3b1),
            3,
            map{y/1/2/r}reverse@_
        )
    ),map{y/312/421/r}@_
)[int<>/11.25+.5];

print ucfirst s/\w/(' by ',north,south,east,west)[$&]/ger,' ',y/1-4-/NSEW/dr

r수정 자 때문에 5.014가 필요합니다 .

자바 스크립트 470 453 438 434 432 421 404

s=String;s.prototype.a=s.prototype.replace;var a=prompt()/11.25,a=a+0.5|0,b,k,c=a,d=c%8,c=c/8|0,e=["north","east","south","west"],f,g,h;f=e[c];g=e[(c+1)%4];h=f==e[0]|f==e[2]?f+g:g+f;b="1;1 by 2;1-C;C by 1;C;C by 2;2-C;2 by 1".split(";")[d].a(1,f).a(2,g).a("C",h);k=b.a(/north/g,"N").a(/east/g,"E").a(/south/g,"S").a(/west/g,"W").a(/by/g,"b").a(/[\s-]/g,"");b=b[0].toUpperCase()+b.slice(1);alert(b+" "+k)

이 코드를 콘솔에 복사하여 실행할 수 있습니다. 각도 입력을 요구하고 결과를 다음과 같이 출력합니다.alert();

Ungolfed Javascript는이 바이올린에서 찾을 수 있습니다 : http://jsfiddle.net/AezL3/11

하스켈 415 372 347 330 317 304 301C

@VadimR과 같은 솔루션에 집중했습니다 (그리고 대칭이 돌아 왔습니다!). 사용법 : h 219출력"Southwest by south SWbS"

d"N"="north"
d"S"="south"
d"E"="east"
d"W"="west"
d"b"=" by "
d"-"="-"
d(x:y)=d[x]++d y
e(x:y)=x:tail(d$x:y)
k 'N'='S'
k 'S'='N'
k 'E'='W'
k x=x
r="N NbE N-NE NEbN NE NEbE E-NE EbN E EbS E-SE SEbE SE SEbS S-SE SbE "
p=words$r++(map k r)
g x=p!!mod(round$x/11.25)32
h x=e(g x)++(filter(/='-')$' ':g x)

@shiona에게 감사드립니다.

파이썬 3.8 , 482 438 424 바이트

lambda h:' '.join([b(h),a(a(a(b(h)),1),d={' by ':'b','-':''})])
L=str.lower
c={'North':'N','East':'E','South':'S','West':'W'}
a=lambda t,l=0,d=c:[*(t:=t.replace([i,L(i)][l],d[i])for i in[*d])][-1]
b=lambda h,k=[*c]:a('W|W by x|W-z|Z by w|Z|Z by x|X-z|X by w'.split('|')[int((q:=h*4/45+.5)%8)],d={'W':(W:=[*k][(v:=int(q//8)%4)]),'X':(X:=[*k][(v+1)%4]),'w':(w:=L(W)),'x':(x:=L(X)),'Z':(Z:=[W+x,X+w][W in'EastWest']),'z':L(Z)})

온라인으로 사용해보십시오!

이것은 tony goodwin의 답변을 골프로 얻은 후에 얻은 것입니다 . 댓글에 대한 TIO 링크가 너무 길어서 자체 답변에 게시되었습니다. 그가 위의 답변을 업데이트하기로 선택하면이 답변을 삭제합니다.

전체 프로그램이 아닌 솔루션으로 함수를 제출하는 것이 허용된다고 가정합니다. 그렇지 않은 경우 다음 은 426 바이트의 전체 프로그램입니다.

나는 많은 캔이 여전히 단축 할 것으로 기대합니다 b.

편집 : 웅장한 해마의 호의로 44 바이트에서 골프를 쳤습니다. 아직도 b골프를 치고있는 것 같은 느낌이 들지 않습니다 .

Edit2 :keys() and 대신 dicts를 압축 해제하여 다른 14 개를 제거했습니다 items().

파이썬, 2103 1647 1103 1034 924 889 848 바이트

매우 늦습니다. 도전 과제 덕분에 Pi로 풍향에 대한 자력계를 설정하고 기상 예측 알고리즘에 공급하기 위해 이와 같은 16 포인트 나침반 솔루션을 원했습니다. 내 모든 코드는 Python에 있으므로 여기에 이미 Python으로 게시 된 Javascript 솔루션 버전이 있지만 변수 j에서 나침반의 32, 16 또는 8 점을 지정할 수있는 추가 왜곡이 있으며 오프셋을 변경했습니다. 점의 수에 따라 이전 명령문의 degHead 질문의 사례 요구 사항을 충족시키기 위해 수정 된 이름 바꾸기 알고리즘 (및 단어를 손상시키지 않고 이름을 바꿀 수있는 변수를 사용했습니다!)을 사용했습니다.

파이썬이 더 장황하기 때문에 이것이 이길 수 없다는 것을 알고 있습니다.

짧은 버전 :

  def a(t,d,l):
    for i,j in d.items():
      if l:
        i=i.lower()
      t=t.replace(i,j)
    return t
  def b(h,q):
    p=32
    r=360
    h=(h+(r/q/2))/(r/p)
    j=int(int(int(h %8)%8/(p/q))*p/q)
    h=int(h/8)%4
    k=c.keys()
    u=['W','W by x','W-z','Z by w','Z','Z by x','X-z','X by w']
    d={}
    d['W']=list(k)[h]
    d['w']=d['W'].lower()
    d['X']=list(k)[(h+1)%4]
    d['x']=d['X'].lower()
    if(d['W']=='North' or d['W']=='South'):
      d['Z']=d['W']+d['x']
    else:
      d['Z']=d['X']+d['w']
    d['z']=d['Z'].lower()
    return a(u[j],d,0)
  def g(n):
    n=a(n,c,0)
    n=a(n,c,1)
    d={'by':'b',' ':'','-':''}
    return a(n,d,0)
  def v(m):
    while True:
      try:
        return float(input(m))
      except ValueError:
        print("?")
  c={'North':'N','East':'E','South':'S','West':'W'}
  while True:
    h=v("?")
    n=b(h,32)
    print(h,n,g(n))

클리어 버전

            import math
            import sys

            def calcPoint(degHead, points):
                maxPoints=32
                if points not in(8,16,32):
                    sys.exit("not a good question")
                degHead=(degHead+(360/points/2))/(360/maxPoints)
                j =int(int( int(degHead  % 8)%8/(maxPoints/points))*maxPoints/points)
                degHead = int(degHead / 8) % 4
                cardinal = ['North', 'East', 'South', 'West']
                pointDesc = ['W', 'W by x', 'W-z', 'Z by w', 'Z', 'Z by x', 'X-z', 'X by w']#vars not compass points
                W = cardinal[degHead]
                X = cardinal[(degHead + 1) % 4]
                w=W.lower()
                x=X.lower()
                if (W == cardinal[0] or W == cardinal[2]) :
                    Z =W + x
                else:
                    Z =X + w
                z=Z.lower()
                return pointDesc[j].replace('W', W).replace('X', X).replace('w', w).replace('x', x).replace('Z', Z).replace('z', z);

            def getShortName(name): 
                return name.replace('North', 'N').replace('East', 'E').replace('South', 'S').replace('West', 'W').replace('north', 'N').replace('east', 'E').replace('south', 'S').replace('west', 'W').replace('by', 'b').replace(' ', '').replace('-', '')

            def input_number(msg, err_msg=None):
                while True:
                    try:
                        return float(input(msg))
                    except ValueError:
                        sys.exit("not a number")

            while True:
                headingCalib=input_number("input a number: ")
                print (headingCalib, end=' ')
                name = calcPoint(headingCalib,32) #degrees heading, points of compass 8,16 or 32)
                print (name, end=' ')
                shortName = getShortName(name)
                print (shortName)