|
Search: id:A043681
|
|
|
| A043681 |
|
When cubed gives number composed just of the digits 0, 1, 2, 3. |
|
+0
1
|
|
| 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
(list; graph; listen)
|
|
|
OFFSET
|
0,3
|
|
|
COMMENT
|
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.
|
|
MATHEMATICA
|
Do[ If[ Union[ IntegerDigits[n^3]] [[ -1]] < 4, Print[n] ], {n, 0, 10^8} ]
|
|
CROSSREFS
|
Cf. A030175.
Adjacent sequences: A043678 A043679 A043680 this_sequence A043682 A043683 A043684
Sequence in context: A136827 A136831 A136836 this_sequence A139707 A139709 A108779
|
|
KEYWORD
|
base,nonn
|
|
AUTHOR
|
Robert G. Wilson v (rgwv(AT)rgwv.com), Jun 23 2001
|
|
|
Search completed in 0.002 seconds
|
