4clojure 题解 Reverse Interleave

按照数值给一个序列交错分组

Write a function which reverses the interleave process into x number of subsequences.

	(= (__ [1 2 3 4 5 6] 2) '((1 3 5) (2 4 6)))
	(= (__ (range 9) 3) '((0 3 6) (1 4 7) (2 5 8)))
	(= (__ (range 10) 5) '((0 5) (1 6) (2 7) (3 8) (4 9)))

使用了clojure中的group-by方法

(fn [coll x]
  (->
    (group-by #(rem % x) coll)
    (seq)
    (map second)))