조 , 5 3 바이트 ( -t
플래그의 경우 +2 또는 +3 )
글쎄, 나는 분명히 Joe의 모든 잠재력을 활용하지 않았다. 내가 이것을 처음 게시했을 때 가능했습니다.
\AR
이리, R
0에서 n까지의 범위를 배타적으로 제공합니다. 그런 다음 \A
접두사를 연속적으로 사용합니다 ( A
식별 기능입니다). 예 :
함께 -t
플래그 (참고 :이 심지어 플래그없이 표준 출력은 이제) :
(\AR)5
0
0 1
0 1 2
0 1 2 3
0 1 2 3 4
\AR5
0
0 1
0 1 2
0 1 2 3
0 1 2 3 4
\AR2
0
0 1
\AR1
0
\AR0
그것없이 :
\AR5
[[0], [0, 1], [0, 1, 2], [0, 1, 2, 3], [0, 1, 2, 3, 4]]
(\AR)5
[[0], [0, 1], [0, 1, 2], [0, 1, 2, 3], [0, 1, 2, 3, 4]]
\AR2
[[0], [0, 1]]
\AR1
[[0]]
\AR0
[]
규칙이 조금 바뀌 었습니다. 이전 코드는 N = 0으로 올바르게 작동하지 않았습니다. 또한 이제 출력은 중첩 목록 일 -t
수 있으므로 삭제할 수 있습니다.
1R1+R
이제 Rn
0에서 n까지의 범위를 배타적으로 제공합니다. 0을 지정하면 빈 목록을 반환합니다. 1+
해당 범위의 모든 요소에 1을 추가합니다. 1R
값을 1에서 x까지의 범위로 매핑합니다. 빈 리트는 매핑 될 때 빈 목록을 반환합니다.
출력 예 :
1R1+R0
[]
1R1+R5
[[1], [1, 2], [1, 2, 3], [1, 2, 3, 4], [1, 2, 3, 4, 5]]
업데이트 : 방금 뭔가를 발견했습니다. 이 함수는 자동으로 순위 0 요소에 매핑됩니다. 다음 예제는 -t
플래그 와 함께 실행됩니다 .
1R1+R3 5 8
1
1 2
1 2 3
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
1 2 3 4 5 6
1 2 3 4 5 6 7
1 2 3 4 5 6 7 8
Old : 5 바이트 ( -t
플래그 포함)
1R1R
이것은 숫자를 취하는 익명 함수이며 1에서 N까지의 목록을 만듭니다.1Rn
) 해당 값을 이전 범위에 매핑하여 1에서 N 범위의 각 항목에 대해 1에서 x까지의 범위를 지정 .
-t
플래그는 J 형 테이블로서 출력을 제공한다.
1R1R5
1
1 2
1 2 3
1 2 3 4
1 2 3 4 5
참고 :이 언어는 매우 새롭고 완전하지는 않지만이 문제 이전에 최신 버전이 릴리스되었습니다.