8 lines
347 B
Text
8 lines
347 B
Text
;; we want 500-almost-primes from the 10000-th.
|
|
(take (drop (list-sort < (almost-primes 500 10000)) 10000 ) 10)
|
|
|
|
(7241149198492252834202927258094752774597239286103014697435725917649659974371690699721153852986
|
|
440733637405206125678822081264723636566725108094369093648384
|
|
etc ...
|
|
|
|
;; The first one is 2^497 * 3 * 17 * 347 , same result as Haskell.
|