1,2

Sequence is finite since it cannot contain numbers of 9 or more digits. Indeed a number of 9 digits is at least equal to 10^8, but the function computed here for a number of n digits is at most (9*n)*(9^2*n)^2, which for n=9 is 43046721 < 10^8. - Giovanni Resta, May 08 2015

52215 is in the sequence because 52215 = (5+2+2+1+5)*(5^2+2^2+2^2+1^2+5^2)^2.

Select[Range@1648656, #==Total[IntegerDigits[#]] *Total[IntegerDigits[#]^2]^2&] (* Ivan N. Ianakiev, May 08 2015 *)

Cf. A115518.

Sequence in context: A119423 A176913 A013687 * A379982 A359839 A126821

Adjacent sequences: A257763 A257764 A257765 * A257767 A257768 A257769

base,nonn,fini,full

Pieter Post, May 07 2015

approved