Minimum primes: Difference between revisions
Add Factor
(Add Factor) |
|||
Line 62:
<pre>
43 101 79 59 67
</pre>
=={{header|Factor}}==
<lang factor>USING: arrays math math.primes prettyprint sequences ;
{ 5 45 23 21 67 } { 43 22 78 46 38 } { 9 98 12 54 53 }
3array flip [ supremum 1 - next-prime ] map .</lang>
{{out}}
<pre>
{ 43 101 79 59 67 }
</pre>
|