Clojure를 사용한 코드 골프에 대한 팁은 무엇입니까?

이 질문의 목적은 Clojure에 특화된 기술 목록을 수집하여 일반적인 코드 골프 문제에서 사용할 수 있습니다.

람다에 리더 구문을 사용하십시오.
그래서 사용

#(+ % %2 %3)

대신에

(fn [x y z] (+ x y z))

공백을 제거 할 수도 있습니다.

#(if (< % 0) (- %) %)
#(if(< % 0)(- %)%)

공백을 제거 할 수있는 위치 :

• 문자열과 다른 것 사이 :

  (println(+"Hello, World!"1))
  

• 대괄호와 다른 것 사이 :

  (for[x(range 5)](* x x))
  

• 숫자와 내장 또는 변수 이름 이외의 모든 것 사이 :

  Allowed:
  (+ 1"Example")
  (map{1"-1"2"-2"}[1 2 3])
  
  Not allowed:
  (+1 2)
  

• 간 @(원자에 대한 역 참조)와 대괄호.

문자열은 일련의 문자로 취급 될 수 있습니다

예를 들어 문자열에서 문자를 알파벳순으로 정렬하려면 :

(sort "hello")
=> (\e \h \l \l \o)

nth ... 0대신 사용first

컬렉션의 첫 번째 요소를 얻으려면 (nth ... 0)over first를 사용하여 바이트 를 저장합니다.

(first[2 3 4]): 14 bytes
(nth[2 3 4]0): 13 bytes (saves a byte!)

축소 대신 적용을 사용하십시오.

예를 들어 #(apply + %)보다 1 바이트가 짧습니다 #(reduce + %).

이미 가지고 있다면 피하십시오

예를 들어 : #(for[a[(sort %)]...)대신 #(let[a(sort %)](for ...)).

for에도 :let구문이 있지만 코드 골프에는 너무 장황합니다.

사용 +하고 -대신 inc하고dec

parens가있는 표현식에서 inc/ dec를 사용하면 1 바이트가 절약됩니다 .

(inc(first[1 3 5]))
(+(first[1 3 5])1)

if동등성을 테스트 할 때 s 대신 맵을 사용하십시오.

;; if n=3 then A else B
(if (= 3 n) A B) ; (if(=3n)AB)
({3 A} n B)      ; ({3A}nB) -> -3 chars

;; if n=2 or n=3 then A else B
(if (#{2 3} n) A B) ; (if(#{23}n)AB)
({2 A 3 A} n B)     ; ({2A3A}nB) -> -4 chars

긴 함수 이름을 1 바이트 기호에 바인드

예를 들어 , 여러 번 사용해야 partition하거나 frequencies여러 번 사용해야 하는 경우 let매크로 에서 단일 바이트 기호에 바인딩하는 것이 좋습니다 . 그런 다음 let달리 필요하지 않으면 가치가 없을 수도 있으며 함수 이름이 상대적으로 짧습니다.

지도 대신 사용

예를 들어 동등한 #(for[i %](Math/abs i))것보다 훨씬 짧습니다 map.