login
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
OFFSET
0,3
LINKS
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
Sequence in context: A112889 A118490 A146310 * A091134 A017816 A250699
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