Triplet of three numbers: Difference between revisions

m
→‎{{header|Factor}}: small improvement
m (→‎{{header|Factor}}: small improvement)
Line 358:
 
: 4,2-gaps ( upto -- seq )
4 + primes-upto 3 <clumps>
[ differences { 4 2 } sequence= ] filter ;
 
Line 364:
"..., %4d, [%4d], __, __, %4d, __, %4d, ...\n" printf ;
 
60046000 4,2-gaps [ first3 [ dup 1 + ] 2dip triplet. ] each</lang>
{{out}}
<pre style="height:14em">
1,808

edits