Advertisement
Guest User

Untitled

a guest
Aug 28th, 2011
202
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. (let [coll [1 2 3 4 5 6 7 8] n 3]
  2.            (loop [c coll r []]
  3.               (if (empty? c)
  4.                   r
  5.                   (loop (drop (dec n) c) (conj r (first (drop (dec n) c)))))))
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement