Ludic numbers: Difference between revisions
m
→{{header|Clojure}}: had too many in indexed output
(→{{header|Clojure}}: Add implementation.) |
m (→{{header|Clojure}}: had too many in indexed output) |
||
Line 132:
(println (count (take-while (partial > 1000) ludic)))
(print "2000th through 2005th: ")
(println (map #(nth ludic %) (range 1999
(print "Triplets < 250: ")
(println (filter (partial every? ludic?)
Line 139:
<pre>First 25: (1 2 3 5 7 11 13 17 23 25 29 37 41 43 47 53 61 67 71 77 83 89 91 97 107)
Count below 1000: 142
2000th through 2005th: (21475 21481 21487 21493 21503 21511
Triplets < 250: ((1 3 7) (5 7 11) (11 13 17) (23 25 29) (41 43 47) (173 175 179) (221 223 227) (233 235 239))</pre>
| |||