|
|
A064931
|
|
Numbers m such that the digits of m are also digits of m^3.
|
|
1
|
|
|
1, 4, 5, 6, 9, 10, 11, 12, 21, 24, 25, 29, 32, 33, 34, 39, 40, 49, 50, 51, 54, 56, 59, 60, 61, 64, 65, 67, 71, 72, 73, 75, 76, 90, 97, 99, 100, 101, 102, 106, 109, 110, 114, 119, 120, 124, 125, 129, 137, 153, 176, 201, 202, 210, 212, 224, 228, 231, 233, 236
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
Presumably if a digit d appears k times in m, then it should appear at least k times in m^3. - N. J. A. Sloane, Nov 24 2018
|
|
LINKS
|
|
|
EXAMPLE
|
12^3 = 1728, which contains all digits of 12, so 12 is a term of the sequence.
|
|
MATHEMATICA
|
Select[Range[400], Min[DigitCount[#^3]-DigitCount[#]]>-1&] (* Harvey P. Dale, Nov 24 2018 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,base
|
|
AUTHOR
|
|
|
EXTENSIONS
|
Corrected and Mathematica program replaced by Harvey P. Dale, Nov 24 2018
|
|
STATUS
|
approved
|
|
|
|