(clojure.repl/source iterate)

nil

"Source not found\n"

(take 10 (interleave (iterate inc 0) (iterate dec -1)))

(0 -1 1 -2 2 -3 3 -4 4 -5)

(println (iterate inc 0))

nil

"(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 ...)\n"

(nth (iterate next []) 3)

nil

(class (iterate + 1))

clojure.lang.Iterate

(nth (iterate vector []) 1000)

[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[[...

(realized? (iterate inc 0))

true

(second (iterate inc 0))

1

(nth (iterate rest []) 3)

()

(nth (iterate list ()) 50)

((((((((((((((((((((((((((((((((((((((((((((((((((()))))))))))))))))))))))))))))))))))))))))))))))))))

(take 10 (iterate rest []))

([] () () () () () () () () ())

(count (take-while identity (map identical? (iterate inc 0) (iterate inc 0))))

128

(list? (iterate inc 0))

false

(nth (iterate list ()) 2000)

((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((((...

(pr-str (iterate inc 0))

"(0 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 ...)"

(chunked-seq? (iterate inc 10))

false

(sequential? (iterate inc 1))

true

(first (drop-while reduced? (iterate deref (nth (iterate reduced 42) 10))))

42

(take 10 (map vector (iterate inc 1) (iterate inc 2)))

([1 2] [2 3] [3 4] [4 5] [5 6] [6 7] [7 8] [8 9] [9 10] [10 11])

(first (iterate inc 2))

2

(realized? (iterate inc 1))

true

(class (iterate inc 2))

clojure.lang.Iterate

(type (iterate inc 0))

clojure.lang.Iterate

(class (iterate inc 0))

clojure.lang.Iterate

(println (iterate inc 1))

nil

"(1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 ...)\n"

(counted? (iterate inc 0))

false

(seq? (iterate inc 0))

true

(nth (iterate list ()) 20)

((((((((((((((((((((()))))))))))))))))))))

(second (iterate inc 1))

2

(sequential? (iterate inc 0))

true

(class (iterate inc 1))

clojure.lang.Iterate

(->> (nth (iterate atom 42) 10000)
     (iterate deref)
     (drop 10000)
     (first))

42

(take 4 (iterate inc 0))

(0 1 2 3)

(nth (iterate class 1) 1000)

java.lang.Class

(take 10 (iterate inc 0))

(0 1 2 3 4 5 6 7 8 9)

(take 5 (iterate inc 0))

(0 1 2 3 4)

(def incs (partial iterate inc))

#'user/incs

(def a (iterate inc 0))

#'user/a

(take 5 (iterate identity :foo))

(:foo :foo :foo :foo :foo)

(take 4 (iterate inc 8))

(8 9 10 11)

(nth (iterate identity 'recursion) 1000000)

recursion

(take 2 (iterate complement boolean))

(#object [clojure.core$boolean 0x548f4f60 "clojure.core$boolean@548f4f60"]
 #object
  [clojure.core$complement$fn__5737 0xe1ad010
   "clojure.core$complement$fn__5737@e1ad010"])

(take 10 (iterate + 0.0))

(0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0 0.0)

(take 3 (iterate identity identity))

(#object [clojure.core$identity 0x2af3b054 "clojure.core$identity@2af3b054"]
 #object [clojure.core$identity 0x2af3b054 "clojure.core$identity@2af3b054"]
 #object [clojure.core$identity 0x2af3b054 "clojure.core$identity@2af3b054"])

(realized? (next (iterate inc 1)))

false

(defn whole-numbers [] (iterate inc 1))

#'user/whole-numbers

(nth (iterate str "hello") 100)

"hello"

(nth (iterate inc 0) 5)

5

(take 10 (iterate dec 20))

(20 19 18 17 16 15 14 13 12 11)

(take 100 (iterate inc 0))

(0
 1
 2
 3
 4
 5
 6
 7
 8
 9
 10
 11
 12
 13
 14
 15
 16
 17
 18
 19
 20
 21
 22
 23
 24
 25
 26
 27
 28
 29
 30
 31
 32
 33
 34
 35
 36
 37
 38
 39
 40
 41
 42
 43
 44
 45
 46
 47
 48
 49
 50
 51
 52
 53
 54
 55
 56
 57
 58
 59
 60
 61
 62
 63
 64
 65
 66
 67
 68
 69
 70
 71
 72
 73
 74
 75
 76
 77
 78
 79
 80
 81
 82
 83
 84
 85
 86
 87
 88
 89
 90
 91
 92
 93
 94
 95
 96
 97
 98
 99)