[clojure] Clojure Core 또는 Contrib에 Zip 기능과 동등한 기능이 있습니까?

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

당신이 원하는 것을합니까 :

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

Haskell은 zipWith( zipWith3,, zipWith4…) 함수 모음이 필요 합니다. 왜냐하면 모두 특정 유형 이어야하기 때문입니다 . 특히, 입력 목록의 수는 고정되어야합니다. 합니다 ( zip, zip2, zip3, …은 가족의 특성화로 간주 될 수 zipWithtupling의 일반적인 사용을위한 가정).

반대로 Clojure와 다른 Lisp는 다양한 arity 기능을 잘 지원합니다. map그 중 하나이며 Haskell과 유사한 방식으로 “터플 링”에 사용될 수 있습니다.

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

Clojure에서 “튜플”을 만드는 관용적 방법은 위에 표시된 것처럼 짧은 벡터를 구성하는 것입니다.

(완전성을 위해 일부 기본 확장 기능을 가진 Haskell은 가변 arity 기능을 허용하지만 언어를 잘 이해해야하지만 바닐라 Haskell 98은 전혀 지원하지 않으므로 고정 arity 기능을 선호합니다 표준 라이브러리.)

답변

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

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

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

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