OFFSET
0,1
COMMENTS
Is the sequence finite?
LINKS
Harvey P. Dale, Table of n, a(n) for n = 0..10000
EXAMPLE
sds(529) = 5^2 + 2^2 + 9^2 = 110 = sds(576) = 25 + 49 + 36.
MATHEMATICA
Flatten[Position[Partition[Total[IntegerDigits[#]^2]&/@(Range[ 5000]^2), 2, 1], _?(First[#]==Last[#]&), {1}, Heads->False]]^2 (* Harvey P. Dale, Jul 10 2014 *)
CROSSREFS
KEYWORD
nonn,base
AUTHOR
Amarnath Murthy, Apr 04 2002
EXTENSIONS
More terms from Jason Earls, May 10 2002
STATUS
approved