Anaprimes: Difference between revisions
m
→{{header|Raku}}: use List::Allmax
(→{{header|ALGOL 68}}: more notes) |
Thundergnat (talk | contribs) m (→{{header|Raku}}: use List::Allmax) |
||
Line 899:
<syntaxhighlight lang="raku" line>use Lingua::EN::Numbers;
use Math::Primesieve;
use List::Allmax;
my $p = Math::Primesieve.new;
for 3 .. 9 {
my
put "\nLargest group of anaprimes before {cardinal 10 ** $_}: {+
put 'First: ', ' Last: ' Z~
}</syntaxhighlight>
{{out}}
<pre>Largest group of anaprimes before one thousand: 4 members.
First: 149 Last: 941
First: 179 Last: 971
First: 379 Last: 937
Largest group of anaprimes before ten thousand: 11 members.
First: 1237 Last: 7321
First: 1279 Last: 9721
Largest group of anaprimes before one hundred thousand: 39 members.
|