|
|
A031997
|
|
Odd numbers which when cubed give number composed just of the digits 0, 1, 2, 3.
|
|
2
|
|
|
1, 11, 101, 1001, 10001, 100001, 684917, 1000001, 10000001, 100000001, 1000000001, 10000000001, 100000000001, 1000000000001, 10000000000001, 100000000000001, 1000000000000001, 10000000000000001, 100000000000000001, 1000000000000000001
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Note that 684917 (whose cube is 321302302131323213) so far is the only entry not of the form 10^x + 1.
|
|
LINKS
|
|
|
MATHEMATICA
|
Do[ If[ Union[ IntegerDigits[ n^3 ] ] [ [ -1 ] ] < 4, Print[ n ] ], {n, 0, 10^9} ]
|
|
PROG
|
(Python)
A031997_list = [n for n in range(1, 10**6, 2) if max(str(n**3)) <= '3'] # Chai Wah Wu, Feb 23 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base,more
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Term 0 removed and a(12)-a(17) added by Chai Wah Wu, Feb 25 2016
|
|
STATUS
|
approved
|
|
|
|