Largest difference between adjacent primes: Difference between revisions

Content added Content deleted
m (syntax highlighting fixup automation)
(added Arturo)
Line 75: Line 75:
Largest gap between primes up to 10000000: 154 between 4652353 and 4652507
Largest gap between primes up to 10000000: 154 between 4652353 and 4652507
</pre>
</pre>

=={{header|Arturo}}==

<syntaxhighlight lang="arturo">primes: select range.step:2 3 1e6 => prime?

pair: couple primes drop primes 1
| maximum'p -> p\1 - p\0
| <=

print "Largest prime gap under a million is:"
print ~"|pair\1 - pair\0| between |pair\0| and |pair\1|"</syntaxhighlight>

{{out}}

<pre>Largest prime gap under a million is:
114 between 492113 and 492227</pre>


=={{header|AWK}}==
=={{header|AWK}}==