Advertisement
Guest User

Untitled

a guest
May 4th, 2016
42
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.28 KB | None | 0 0
  1. (defn geometric
  2. ([] geometric 1)
  3. ([n] (cons n (lazy-seq (geometric (* n 1/2))))))
  4.  
  5. (geometric)
  6.  
  7. (take 10 (geometric))
  8.  
  9. IllegalArgumentException Don't know how to create ISeq from:
  10. java.lang.Long clojure.lang.RT.seqFrom
  11.  
  12. (1 1/2 1/4 1/8 1/16 1/32 1/64 1/128 1/256 1/512)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement