Humble numbers: Difference between revisions
Content added Content deleted
(→{{header|Factor}}: more efficient counting; keep track of next digit threshold instead of calling log10 on 20 million numbers) |
m (→{{header|Factor}}: show more output) |
||
| Line 86: | Line 86: | ||
: humble-numbers ( -- ) |
: humble-numbers ( -- ) |
||
<humble-iterator> dup |
[ <humble-iterator> dup 95 upto-n-digits |
||
[ .first50 nl ] [ drop .digit-breakdown nl ] [ |
[ .first50 nl ] [ drop .digit-breakdown nl ] [ |
||
"Total number of humble numbers found: " write length |
"Total number of humble numbers found: " write length |
||
commas print |
commas print |
||
] tri ; |
] tri ] time ; |
||
MAIN: humble-numbers</lang> |
MAIN: humble-numbers</lang> |
||
| Line 179: | Line 179: | ||
993,058 have 79 digits |
993,058 have 79 digits |
||
1,030,928 have 80 digits |
1,030,928 have 80 digits |
||
1,069,748 have 81 digits |
|||
1,109,528 have 82 digits |
|||
1,150,287 have 83 digits |
|||
1,192,035 have 84 digits |
|||
1,234,774 have 85 digits |
|||
1,278,527 have 86 digits |
|||
1,323,301 have 87 digits |
|||
1,369,106 have 88 digits |
|||
1,415,956 have 89 digits |
|||
1,463,862 have 90 digits |
|||
1,512,840 have 91 digits |
|||
1,562,897 have 92 digits |
|||
1,614,050 have 93 digits |
|||
1,666,302 have 94 digits |
|||
1,719,669 have 95 digits |
|||
Total number of humble numbers found: |
Total number of humble numbers found: 41,990,065 |
||
Running time: 335.1803624581294 seconds |
|||
</pre> |
</pre> |
||