

A117685


Squares for which the sum of the digits are cubes.


2



0, 1, 100, 3969, 7569, 8649, 10000, 12996, 13689, 15876, 19881, 33489, 34596, 36864, 42849, 45369, 46656, 47961, 49284, 51984, 54756, 56169, 59049, 66564, 71289, 74529, 76176, 77841, 79524, 82944, 84681, 86436, 88209, 91809, 93636, 95481, 97344, 99225
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

0,3


LINKS

Harvey P. Dale, Table of n, a(n) for n = 0..1000


EXAMPLE

8649 is in the sequence because it is a square and the sum of the digits 8+6+4+9=27 is a cube.


MATHEMATICA

Select[Range[0, 400]^2, IntegerQ[Power[Total[IntegerDigits[#]], (3)^1]]&] (* Harvey P. Dale, Jan 28 2012 *)


CROSSREFS

Cf. A000290, A000578.
Sequence in context: A112889 A118490 A146310 * A091134 A017816 A250699
Adjacent sequences: A117682 A117683 A117684 * A117686 A117687 A117688


KEYWORD

nonn,base


AUTHOR

Luc Stevens (lms022(AT)yahoo.com), Apr 12 2006


EXTENSIONS

Corrected (a(18) inserted) and extended by Harvey P. Dale, Jan 28 2012


STATUS

approved



