Clojure Core或Contrib中的Zip功能是否相同?

时间:2010-04-06 20:52:16

标签: clojure

在Clojure中,我想结合两个列表来给出一对对象列表,

> (zip '(1 2 3) '(4 5 6))  
((1 4) (2 5) (3 6))

在Haskell或Ruby中,该函数称为 zip 。实现它并不困难,但我想确保我没有错过Core或Contrib中的函数。

Core中有一个zip命名空间,但described提供了对Zipper功能技术的访问权限,这似乎不是我所追求的。

是否有一个等效函数用于组合2个或更多列表,这样,在Core中?

如果没有,是不是因为有一种惯用的方法会导致函数不需要?

7 个答案:

答案 0 :(得分:198)

(map vector '(1 2 3) '(4 5 6))

做你想做的事:

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

Haskell需要zipWithzipWith3zipWith4,...)函数的集合,因为它们都需要是特定的类型;特别是,他们接受的输入列表的数量需要修复。 (zipzip2zip3,...系列可以视为zipWith系列的特殊化,用于常规用例。

相比之下,Clojure和其他Lisps对变量arity函数有很好的支持; map是其中之一,可以用类似于Haskell的方式用于“tupling”

zipWith (\x y -> (x, y))

在Clojure中构建“元组”的惯用方法是构造一个短向量,如上所示。

(只是为了完整性,请注意Haskell带有一些基本的扩展确实允许变量arity函数;使用它们需要很好地理解语言,而且vanilla Haskell 98可能根本不支持它们,因此固定arity函数最适合标准库。)

答案 1 :(得分:15)

(partition 2 (interleave '(1 2 3) '(4 5 6))) 
=> ((1 4) (2 5) (3 6))

或更一般地

(defn zip [& colls]
  (partition (count colls) (apply interleave colls)))

(zip '( 1 2 3) '(4 5 6))           ;=> ((1 4) (2 5) (3 6))

(zip '( 1 2 3) '(4 5 6) '(2 4 8))  ;=> ((1 4 2) (2 5 4) (3 6 8))

答案 2 :(得分:12)

(map vector [1 2 3] [4 5 6])

答案 3 :(得分:10)

为了准确地提供您想要的内容,在两个列表中映射list将为您提供列表,例如您的示例。我认为很多Clojurians倾向于使用矢量,虽然它可以用于任何事情。并且输入不需要是相同的类型。 map从它们创建seqs然后映射seqs,这样任何seq'able输入都可以正常工作。

(map list '(1 2 3) '(4 5 6))
(map list  [1 2 3] '(4 5 6))
(map hash-map  '(1 2 3) '(4 5 6))
(map hash-set  '(1 2 3) '(4 5 6))

答案 4 :(得分:3)

内置方式只是函数'interleave':

(interleave [1 2 3 4] [5 6 7 8]) => [1 5 2 6 3 7 4 8]

答案 5 :(得分:-1)

有一个叫做zipmap的函数可能有类似的效果,     (zipmap (1 2 3)(4 5 6)) 产量如下:     {3 6,2 5,1 4}

答案 6 :(得分:-2)

#(应用地图列表%)转换矩阵就像Python zip *函数一样。作为宏定义:

用户=> (defmacro py-zip [lst]`(应用地图列表~lst))

#'用户/ PY-拉链

用户=> (py-zip'((1 2 3 4)(9 9 9 9)(5 6 7 8)))

((1 9 5)(2 9 6)(3 9 7)(4 9 8))

用户=> (py-zip'((1 9 5)(2 9 6)(3 9 7)(4 9 8)))

((1 2 3 4)(9 9 9 9)(5 6 7 8))