Returns a lazy sequence of the first n items in coll, or all items if
there are fewer than n.
(defn take
"Returns a lazy sequence of the first n items in coll, or all items if
there are fewer than n."
{:added "1.0"
:static true}
[n coll]
(lazy-seq
(when (pos? n)
(when-let [s (seq coll)]
(cons (first s) (take (dec n) (rest s)))))))
Comments top
No comments for take. Log in to add a comment.