Piprimes: Difference between revisions
Add Factor
Drkameleon (talk | contribs) (Added Arturo implementation) |
(Add Factor) |
||
Line 232:
17 18 18 18 18 18 18 19 19 19 19 20 20 21 21 21 21 21 21
</pre>
=={{header|Factor}}==
{{works with|Factor|0.99 2021-02-05}}
<lang factor>USING: formatting grouping io lists math.primes
math.primes.lists math.ranges math.statistics sequences ;
21 lprimes lnth [1,b) [ prime? ] cum-count
10 group [ [ "%2d " printf ] each nl ] each</lang>
{{out}}
<pre>
0 1 2 2 3 3 4 4 4 4
5 5 6 6 6 6 7 7 8 8
8 8 9 9 9 9 9 9 10 10
11 11 11 11 11 11 12 12 12 12
13 13 14 14 14 14 15 15 15 15
15 15 16 16 16 16 16 16 17 17
18 18 18 18 18 18 19 19 19 19
20 20 21 21 21 21 21 21
</pre>
=={{header|Fermat}}==
<lang fermat>n:=0; p:=0
| |||