login
A066390
Smallest cube that contains exactly n consecutive internal 0's and no other 0s.
1
1, 4096, 250047, 2000376, 21300003648, 100000721719296, 64927000000829448, 14123877000000067, 9999699366860000000091, 70000000009754982974477, 24647736180000000000817838592, 3314969780000000000035268964568841, 582244272575941991000000000000826824, 2877745360000000000000183218187366976
OFFSET
0,2
MATHEMATICA
Do[ While[a = Flatten[ Position[ IntegerDigits[ k^3], 0]]; Mod[k, 10] == 0 || Length[a] < n || Last[a] - First[a] + 1 != n, k++ ]; Print[k^3], {n, 0, 7} ]
CROSSREFS
The cube roots are in A066391. Cf. A066371.
Sequence in context: A016782 A017488 A017620 * A016806 A231844 A232961
KEYWORD
nonn,base,less
AUTHOR
Robert G. Wilson v, Dec 23 2001
EXTENSIONS
Title clarified, a(7) corrected and a(8)-a(10) from Sean A. Irvine, Oct 11 2023
a(11) from Michael S. Branicky, Nov 15 2023
a(12)-a(13) from Michael S. Branicky, Dec 22 2023
STATUS
approved