OFFSET
1,1
COMMENTS
A066564 lists numbers k such that k + sum_of_digits(k) is a square.
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..250
EXAMPLE
a(3)=121 because 121 + (1 + 2 + 1) = 125 = 5^3.
MATHEMATICA
Select[Range[80000], IntegerQ[Surd[#+Total[IntegerDigits[#]], 3]]&] (* Harvey P. Dale, Sep 13 2018 *)
PROG
(PARI) isok(n) = ispower(n + sumdigits(n), 3); \\ Michel Marcus, Oct 09 2013
CROSSREFS
KEYWORD
easy,nonn,base
AUTHOR
Zak Seidov, Jun 29 2003
EXTENSIONS
More terms from Michel Marcus, Oct 04 2013
STATUS
approved