많은 마술 사각형이있다, 그러나 다만이 일 이 아닌 사소한 마법 육각형으로, 박사 제임스 피부를 깨끗하게 설명 다음이다 :

  18 17  3
 11  1  7 19
9  6  5  2 16
 14  8  4 12
  15 13 10

그것이 이루어 지듯이 Hexagony 것처럼 이것은 한 줄씩 읽음으로써 한 줄로 작성하는 것이 가장 쉽습니다.

18 17 3 11 1 7 19 9 6 5 2 16 14 8 4 12 15 13 10

물론 회전과 반사를 세면이 마법 육각형에 대한 총 12 개의 목록 표현이 있습니다. 예를 들어 위 육각형의 시계 방향으로 1/6 회전하면

9 11 18 14 6 1 17 15 8 5 7 3 13 4 2 19 10 12 16

@Okx는 나머지 변형을 나열하도록 요청했습니다. 나머지 목록은 다음과 같습니다.

15 14 9 13 8 6 11 10 4 5 1 18 12 2 7 17 16 19 3
3 17 18 19 7 1 11 16 2 5 6 9 12 4 8 14 10 13 15
18 11 9 17 1 6 14 3 7 5 8 15 19 2 4 13 16 12 10
9 14 15 11 6 8 13 18 1 5 4 10 17 7 2 12 3 19 16

언급 된 모든 목록을 뒤집 었습니다.

도전

마법의 육각형을 목록으로 출력하는 프로그램을 작성하십시오. 당신은 어떤 것을 선택할 수 있습니다육각형의 12 가지 반사 / 회전 하나 .

솔루션 작동 방식에 대해 몇 마디 추가하십시오.

옥타브, 24 바이트

'IKRNFAQOHEGCMDBSJLP'-64

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

젤리 , 11 바이트

“JɼQⱮȦ>Ȯ’Œ?

주어진 방향의 목록을 반환하는 닐라 딕 링크는 왼쪽-오른쪽에 반영됩니다.

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

어떻게?

내가 만든 것의 종류 Œ?

“JɼQⱮȦ>Ȯ’Œ? - Niladic link: no arguments
“JɼQⱮȦ>Ȯ’   - base 250 number, 18473955480703453
         Œ? - shortest permutation of some set of natural numbers one through to some N
            -   inclusive which would lie at that index in a list of all permutations of
            -   those same natural numbers when sorted lexicographically.
            -
            -   - for example 7Œ?:
            -   - since 7 is greater than 3! and less than 4!+1, it references four items
            -   - the sorted order of permutations of 4 items is:
            -   - [[1,2,3,4],[1,2,4,3],[1,3,2,4],[1,3,4,2],[1,4,2,3],[1,4,3,2],[2,1,3,4], ...]
            -   - so 7Œ? yields [2,1,3,4]

Pyth, 15 바이트

.PC"A¡öò\x06\x11Ý"S19

(제어 문자가 \x06및\x11 보기 편의 보기 편의를 위해 됩니다.)

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

작동 원리

   "A¡öò\x06\x11Ý"      magic string
  C                     convert to number n using codepoints as base-256 digits
.P                S19   nth lexicographic permutation of [1, …, 19]

05AB1E , 14 바이트

두 솔루션 모두 목록을 생성합니다 [3,17,18,19,7,1,11,16,2,5,6,9,12,4,8,14,10,13,15]

19Lœ•δn2мׄÁ•è

범위의 모든 (정렬 된) 순열 목록을 생성하고 [1...19]기본 255 개의 압축 된 기본 10 숫자를 사용하여 해당 목록에 색인을 만듭니다.

또는 온라인으로 실행할 수있는 15 바이트

•áRвºñ*$vn+•20в

기본 255 문자열을 기본 10 숫자로 압축 해제하고 기본 20 자리 목록으로 변환합니다.

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

SOGL , 15 바이트

³←@uΙΒQH√y׀“L«─

설명:

...“     push the number 4121998669867569415662783
    L«   push 20
      ─  convert 4121998669867569415662783 from base 10 to a base 20 number aka base 10 array 

젤리 , 21 바이트

18473955480703453œ?19

나는 그 큰 숫자를 정말로 압축하고 싶지만 어떻게하는지 잘 모르겠습니다.

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

APL, 24 바이트

⎕A⍳'RQCKAGSIFEBPNHDLOMJ'

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

어떻게?

⎕A                        ⍝ 'ABC...
   ⍳                       ⍝ indices of
    'RQCKAGSIFEBPNHDLOMJ'  ⍝ ← this vector

자바 스크립트 (ES6), 49 바이트

[...'ih3b17j9652ge84cfda'].map(n=>parseInt(n,26))

console.log(
[...'ih3b17j9652ge84cfda'].map(n=>parseInt(n,26))
)

수학, 37 바이트

36^^md1o3apsqxqkfhq6~IntegerDigits~20

설명 (Mathematica가 코드 골프 언어가 아니라 OP 요구 사항에 따라 이미 명확 할 수 있음) :

36  : Number base
^^  : Input a number in arbitrary base. See BaseForm documentation
md1o3apsqxqkfhq6 : the number in base 36
~IntegerDigits~20 : convert to base 20 as list of digits

산출:

{18,17,3,11,1,7,19,9,6,5,2,16,14,8,4,12,15,13,10}

apt , 27 바이트

rahnema1의 솔루션에서 영감을 얻었습니다.

`ikrnfaqogcmdbsjlp`¨c -96

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