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

Question

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

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

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

Core中有一个zip命名空间,但它被描述为提供对Zipper功能技术的访问,这似乎不是我所追求的.

以这种方式在Core中是否存在用于组合2个或更多列表的等效函数？

如果没有,是不是因为有一种惯用的方法使得函数不需要？

Answer 1

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

做你想要的:

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

Haskell需要zipWith(zipWith3,zipWith4...)函数的集合,因为它们都需要是特定类型的 ; 特别是,他们接受的输入列表的数量需要修复.(本zip,zip2,zip3,...系列可以看作是一个专业化zipWith的家人几倍的常见的情况).

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

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

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

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

Answer 2

(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))

Answer 3

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

Answer 4

为了准确地提供您想要的内容,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))