Jump to content

Smarandache-Wellin primes: Difference between revisions

m
→‎{{header|Raku}}: Whoops, overlooked zero
m (→‎{{header|Raku}}: Add a Raku example)
m (→‎{{header|Raku}}: Whoops, overlooked zero)
Line 39:
sink @Smarandache-Whellen[1500]; # pre-reify for concurrency
 
sub derived ($n) { my %digits = $n.comb.Bag; (10..9).map({ %digits{$_} // 0 }).join }
 
sub abbr ($_) { .chars < 41 ?? $_ !! .substr(0,20) ~ '…' ~ .substr(*-20) ~ " ({.chars} digits)" }
Line 67:
 
Smarandache-Whellen derived primes:
Index: 6431, 452328576235194194123321127
Index: 7371, 47234179728521547233879626521
Index: 101 72, 55265428181036833547233979727521
Index: 108133, 5626562825124093713672766322929571043
Index: 110224, 572656282514419373916856106393739943689
Index: 112302, 59265728251642937462696313560586013558131
Index: 122308, 63266131272746939532727113760586013758133
Index: 153362, 7231723232327029496430314317473636515467149
Index: 208461, 14650923637378835838734722823685889120488197
Index: 230489, 175571104639399536919035923128899919621189209</pre>
</pre>
 
 
=={{header|Wren}}==
10,333

edits

Cookies help us deliver our services. By using our services, you agree to our use of cookies.