Minimum primes: Difference between revisions

Content added Content deleted
(→‎{{header|ALGOL 68}}: Make the sieve sie more appropriate for the elements)
Line 144: Line 144:
</pre>
</pre>
=={{header|Factor}}==
=={{header|Factor}}==
<lang factor>USING: arrays math math.primes prettyprint sequences ;
<lang factor>USING: math math.order math.primes prettyprint sequences ;


{ 5 45 23 21 67 } { 43 22 78 46 38 } { 9 98 12 54 53 }
{ 5 45 23 21 67 } { 43 22 78 46 38 } { 9 98 12 54 53 }
3array flip [ supremum 1 - next-prime ] map .</lang>
[ max max 1 - next-prime ] 3map .</lang>
{{out}}
{{out}}
<pre>
<pre>