login
A117688
Cubes for which the sum of the digits is a square.
0
0, 1, 27, 216, 1000, 27000, 216000, 287496, 884736, 970299, 1000000, 1860867, 2146689, 3581577, 3796416, 4019679, 5000211, 6128487, 6434856, 6751269, 7414875, 7762392, 10077696, 14348907, 15438249, 16581375, 21717639, 22425768
OFFSET
0,3
EXAMPLE
216 is in the sequence because it is a cube and the sum of its digits 2+1+6=9 is a square.
MATHEMATICA
Select[Range[0, 300]^3, IntegerQ[Sqrt[Total[IntegerDigits[#]]]]&] (* Harvey P. Dale, Mar 29 2012 *)
CROSSREFS
Sequence in context: A224354 A224013 A059827 * A272342 A107054 A160441
KEYWORD
nonn,base
AUTHOR
Luc Stevens (lms022(AT)yahoo.com), Apr 12 2006
STATUS
approved