Palindromic gapful numbers: Difference between revisions
m
→Ludicrously fast to 10,000,000,000,000,000,000th: match output font size
(→Ludicrously fast to 10,000,000,000,000,000,000th: much simpler rmdr function) |
m (→Ludicrously fast to 10,000,000,000,000,000,000th: match output font size) |
||
Line 2,879:
function collect(integer digit, atom count, keep)
atom to_skip = count - keep,
palcount =
sequence pals = {}
string lhs = ""&(digit+'0') -- ie "1" or "2" .. or "9"
Line 3,023:
</pre>
On 64bit you'll also get (in 0.8s)
<pre style="font-size: 11px">
10,000,000,000,000,000,000th palindromic gapful number ending with:
9: 968787878787878787639936787878787878787869
</pre>
I
spare time you have, leave this running and it'll look better, uncomment the reset of
count, to something that'll actually finish, and you'll start to believe. :-)
|