|
|
A043681
|
|
When cubed gives number composed just of the digits 0, 1, 2, 3.
|
|
4
|
|
|
0, 1, 10, 11, 100, 101, 110, 1000, 1001, 1010, 1100, 10000, 10001, 10010, 10100, 11000, 100000, 100001, 100010, 100100, 101000, 110000, 684917, 1000000, 1000001, 1000010, 1000100, 1001000, 1010000, 1100000, 6849170, 10000000, 10000001, 10000010, 10000100, 10001000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,3
|
|
COMMENTS
|
684917*10^x (whose cube is 321302302131323213*10^3x) so far is the only entry not of the form 10^a + 10^b, a>b or simply 10^a.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ If[ Union[ IntegerDigits[n^3]] [[ -1]] < 4, Print[n] ], {n, 0, 10^8} ]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Offset corrected and terms a(33) and beyond added by Giovanni Resta, Mar 14 2020
|
|
STATUS
|
approved
|
|
|
|