根据clojure中最长的seq来映射向量的惯用方法是什么？

Question

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

会给:

([1 4] [2 5])

这里3被丢弃了.

如果我想自动将那些太短的seqs填充到最大长度怎么办？

例如,如果我想获得什么是惯用的方式

([1 4] [2 5] [3 nil])

Answer 1

(defn map-all [f & colls]
  (lazy-seq
   (when (some seq colls)
     (cons (apply f (map first colls))
           (apply map-all f (map rest colls))))))

(map-all vector [1 2 3] [4 5])
;=> ([1 4] [2 5] [3 nil])