Clojure Core或Contrib中的Zip函数是否有等价物?
在Clojure中,我想结合两个列表来给出一个列表对,
> (zip '(1 2 3) '(4 5 6))
((1 4) (2 5) (3 6))
在Haskell或Ruby中,函数称为zip。 实现它并不困难,但我想确保在Core或Contrib中不会缺少函数。
Core中有一个zip命名空间,但它被描述为提供对Zipper功能技术的访问,这看起来并不是我所追求的。
在Core中以这种方式组合2个或更多列表是否有等效函数?
如果没有,是不是因为有一种惯用的方法使得该功能不需要?
(map vector '(1 2 3) '(4 5 6))
做你想做的事情:
=> ([1 4] [2 5] [3 6])
Haskell需要zipWith
( zipWith3
, zipWith4
,...)函数的集合,因为它们都需要具有特定的类型; 特别是他们接受的输入列表数量需要加以修正。 (该zip
, zip2
, zip3
,...系列可以看作是一个专业化zipWith
家族几倍的常见的情况)。
相比之下,Clojure和其他Lisp对变量函数有很好的支持; map
就是其中之一,可以用类似于Haskell的方式来“捣蛋”
zipWith (x y -> (x, y))
在Clojure中构建“元组”的惯用方法是构建一个短矢量,如上所示。
(为了完整性,请注意Haskell带有一些基本的扩展允许变量arity函数;然而,使用它们需要对语言有很好的理解,而且,Haskell 98可能根本不支持它们,因此固定的arity函数是可取的对于标准库。)
(map vector [1 2 3] [4 5 6])
(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))
链接地址: http://www.djcxy.com/p/38575.html
上一篇: Is there an equivalent for the Zip function in Clojure Core or Contrib?
下一篇: Common programming mistakes for Clojure developers to avoid