|
| |
|
|
A064931
|
|
Numbers n such that the digits of n are also digits of n^3.
|
|
0
| |
|
|
1, 4, 5, 6, 9, 12, 24, 25, 29, 34, 39, 49, 56, 59, 67, 124, 125, 129, 137, 236, 238, 245, 249, 279, 345, 346, 347, 368, 389, 467, 689, 1235, 1236, 1238, 1249, 1256, 1258, 1345, 1368, 1459, 1467, 1567, 1679, 1689, 2349, 2359, 2457, 2458, 2589, 3459, 3467
(list; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
EXAMPLE
| 12^3 = 1728, which contains all digits of 12, so 12 is a term of the sequence.
|
|
|
MATHEMATICA
| Do[a = IntegerDigits[n^3]; b = IntegerDigits[n]; If[Intersection[a, b] == b, Print[n]], {n, 1, 10^4}]
|
|
|
CROSSREFS
| Sequence in context: A192360 A115984 A145025 * A073263 A039013 A020669
Adjacent sequences: A064928 A064929 A064930 * A064932 A064933 A064934
|
|
|
KEYWORD
| nonn,base
|
|
|
AUTHOR
| Joseph L. Pe (joseph_l_pe(AT)hotmail.com), Feb 14 2002
|
| |
|
|
