Uzyskaj dwa elementy z sekwencji za każdym razem

Question

Czy clojure ma potężną "pętlę", jak zwykłe seplenienie.

na przykład:

dostać dwa elementy z sekwencji za każdym razem

Common Lisp:

(loop for (a b) on '(1 2 3 4) by #'cddr collect (cons a b)) 

jak to zrobić w Clojure?

Answer 1

Wykorzystując for a niektóre demontażu struktury można osiągnąć swój konkretny przykład:

(for [[a b] (partition 2 [1 2 3 4])](use-a-and-b a b)) 

Answer 2

Jest cl-loop, który jest workalike LOOP, a istnieją również i clj-iterate, które są zarówno w oparciu o iterate looping construct dla Common Lisp.

Answer 3

Clojure jest wielofunkcyjny zapętlenie konstrukt jest for. Nie ma w nim wbudowanych tak wielu funkcji, jak wbudowana w CL CL-a (w szczególności te, które nie są efektem ubocznym, ponieważ Clojure zachęca do funkcjonalnej czystości), więc wiele operacji, które można wykonać w inny sposób, po prostu za pomocą samego loop, jest wykonywanych "w pobliżu" for. Na przykład, aby zsumować elementy wygenerowane przez for, należy umieścić przed nim apply +; aby przejść elementy parami, możesz (jak pokazuje sw1nn) użyć partition 2 na sekwencji wejściowej podanej do for.

Answer 4

Zrobiłbym to z loop, recur i zniszczeniem.

Na przykład, jeśli chciałem grupy co dwie wartości ze sobą:

(loop [[a b & rest] [1 2 3 4 5 6] 
     result []] 
    (if (empty? rest) 
    (conj result [a b]) 
    (recur rest (conj result [a b])))) 

kończy się w wyniku:

=> [[1 2] [3 4] [5 6]]

a i b są pierwsze i drugie elementy sekwencja odpowiednio, a następnie rest jest to, co zostało. Możemy wtedy powtarzalnie chodzić, dopóki nie pozostanie nic w rest i skończymy.