Piprimes: Difference between revisions

=={{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>