Quais são as suas dicas para jogar código com o Clojure?

O objetivo desta pergunta é coletar uma lista de técnicas específicas do Clojure e que podem ser usadas em problemas gerais de golfe com código.

Use a sintaxe do leitor para lambdas.
Então use

#(+ % %2 %3)

ao invés de

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

Você também pode eliminar o espaço em branco algumas vezes:

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

Onde você pode remover o espaço em branco:

• Entre uma string e qualquer outra coisa:

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

• Entre colchetes e qualquer outra coisa:

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

• Entre um número e tudo que não sejam nomes internos ou variáveis:

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

• Entre @(desreferência para átomos) e colchetes.

Strings podem ser tratadas como uma sequência de caracteres

por exemplo, para classificar os caracteres em uma string em ordem alfabética:

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

Use em nth ... 0vez defirst

Para obter o primeiro elemento de uma coleção, usar (nth ... 0)over firstsalva um byte:

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

Use aplicar em vez de reduzir

Por exemplo, #(apply + %)um byte é menor que #(reduce + %).

Evite deixar se você já tiver um

Por exemplo: em #(for[a[(sort %)]...)vez de#(let[a(sort %)](for ...)) .

Pois também tem uma :letconstrução, mas é muito detalhada para o código de golfe.

Use +e em -vez de incedec

Isso economiza 1 byte se você estiver usando inc/ decem uma expressão com parens:

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

Use mapas em vez de ifs ao testar a igualdade

;; 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

Vincule nomes de função longos em let a um símbolo de byte único

Por exemplo, se você precisa usar partitionou frequenciesvárias vezes, poderia ser benéfico para ligá-los a um símbolo de byte único em uma letmacro. Então, novamente, pode não valer a pena se você não precisar do letcontrário, e o nome da função é relativamente curto.

Use para em vez de mapa

Por exemplo, #(for[i %](Math/abs i))é muito menor que o mapequivalente.