|
| |
|
|
A053058
|
|
Cubes whose digit sum is also a cube.
|
|
1
|
|
|
|
0, 1, 8, 125, 512, 1000, 1331, 8000, 19683, 35937, 46656, 59319, 74088, 125000, 157464, 185193, 328509, 373248, 421875, 474552, 512000, 592704, 658503, 804357, 1000000, 1030301, 1157625, 1259712, 1331000, 1367631, 1481544, 2460375
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,3
|
|
|
REFERENCES
|
Felice Russo, A set of new Smarandache functions, sequences and conjectures in number theory, American Research Press 2000
|
|
|
LINKS
|
Table of n, a(n) for n=1..32.
|
|
|
MATHEMATICA
|
Select[Range[0, 200]^3, IntegerQ[(Plus@@IntegerDigits[ #])^(1/3)]&] - Dean Hickerson (dean.hickerson(AT)yahoo.com), Apr 08 2002
|
|
|
PROG
|
(PARI) v=List(); for(n=0, 1e2, if(ispower(sumdigits(n^3), 3), listput(v, n^3))); Vec(v) \\ Charles R Greathouse IV, Sep 20 2012
|
|
|
CROSSREFS
|
Cf. A000578.
Sequence in context: A069459 A024282 A065082 * A050803 A016791 A061103
Adjacent sequences: A053055 A053056 A053057 * A053059 A053060 A053061
|
|
|
KEYWORD
|
easy,base,nonn,changed
|
|
|
AUTHOR
|
Felice Russo, Feb 25 2000
|
|
|
EXTENSIONS
|
More terms from James A. Sellers, Feb 28 2000
Edited by N. J. A. Sloane, Apr 11 2009 at the suggestion of Eric Angelini.
|
|
|
STATUS
|
approved
|
| |
|
|
