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!)

reduceの代わりにapplyを使用します

たとえば、#(apply + %)は1バイト短くなり#(reduce + %)ます。

既にforを持っている場合はletを避けてください

例：の#(for[a[(sort %)]...)代わりに#(let[a(sort %)](for ...))。

forにも:let構造がありますが、コードゴルフには冗長すぎます。

+andの-代わりにincandを使用しますdec

これは、括弧付きの式で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

letで長い関数名をシングルバイトシンボルにバインドする

たとえばpartition、frequencies複数回使用する必要がある場合は、letマクロ内のシングルバイトシンボルにバインドすると便利です。letそうしないと、別の方法が必要ない場合は価値がなくなる可能性があり、関数名は比較的短いです。

マップの代わりに使用

たとえば#(for[i %](Math/abs i))、map同等のものよりもはるかに短いです。