OFFSET
1,2
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
EXAMPLE
91 is a term because 91 sorted is 19 and the sum of the squares of the digits of 19 = 1^2 + 9^2 = 82 and 19 + 82 = 101, a palindrome.
MATHEMATICA
dsQ[n_]:=Module[{sd=FromDigits[Sort[IntegerDigits[n]]], ds=Total[ IntegerDigits[n]^2], idc}, idc=IntegerDigits[sd+ds]; idc==Reverse[idc]]; Select[Range[500], dsQ] (* Harvey P. Dale, Nov 06 2013 *)
CROSSREFS
KEYWORD
base,easy,nonn
AUTHOR
Jason Earls and Amarnath Murthy, Jul 14 2003
EXTENSIONS
Corrected by T. D. Noe, Oct 25 2006
Name clarified by Jon E. Schoenfield, Apr 14 2024
STATUS
approved