OFFSET
1,2
EXAMPLE
235 is a term because 2^2 + 3^3 + 5^5 = 3156 and 2353156 = 1534^2.
PROG
(PARI) f(n)=if(n, n=digits(n); sum(i=1, #n, n[i]^n[i]), 1); \\ A045503
isok(k) = issquare(fromdigits(concat(digits(k), digits(f(k))))); \\ Michel Marcus, Mar 05 2024
CROSSREFS
KEYWORD
base,nonn
AUTHOR
Jason Earls, Jul 04 2005
EXTENSIONS
More terms from Ryan Propper, Jul 07 2005
STATUS
approved