|
|
A048374
|
|
a(n)^3 is smallest cube containing exactly n 9's.
|
|
21
|
|
|
9, 31, 99, 998, 999, 7937, 9999, 99998, 99999, 996999, 999999, 6688699, 9999999, 97609999, 99969999, 999999998, 999899999, 9998999999, 9999999999, 9999699999, 99999989999, 99998999999, 997999998999
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
nsmall = Table[Infinity, 11];
For[i = 0, i <= 10^6, i++, n0 = Count[IntegerDigits[i^3], 9];
If[nsmall[[n0]] > i, nsmall[[ n0]] = i]];
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|