如何將一個列表變成clojure中後續元素對的列表？

Question

有Clojure中的一個函數，它執行以下操作：

(_ '(1 2 3 4 5)) => '((1 2) (2 3) (3 4) (4 5)) 

我敢肯定我見過類似的東西..早不記得這是什麼。

Answer 1

你可以做到這一點內建partition功能：

> (partition 2 1 '(1 2 3 4 5)) 
((1 2) (2 3) (3 4) (4 5)) 

但是，當人們問「所有對」他們usially意味着「所有組合」。如果您需要所有組合 - 請使用math.combinatorics。

Answer 2

像這樣：

(defn pairs [coll] 
    (map list coll (next coll))) 

(pairs '(1 2 3 4 5)) 
;;=> ((1 2) (2 3) (3 4) (4 5)) 

Answer 3

有combinatorics一個更通用的解決方案給所有對（但我知道這是不是你的例子做什麼）。

Clojure=> (combinations '(a b c) 2) 
((a b) (a c) (b c)) 
Clojure=> (combinations '(a b c d e) 3) 
((a b c) (a b d) (a b e) (a c d) (a c e) (a d e) (b c d) (b c e) (b d e) (c d e))