A085936 Numbers k such that the number resulting from sorting the digits of k in ascending order + the sum of the squares of the digits of k is a palindrome. Or, sortdigits(k) + digitsumsquare(k) is a palindrome.

1, 2, 10, 19, 20, 24, 26, 38, 42, 57, 62, 75, 78, 83, 87, 91, 100, 109, 119, 122, 127, 138, 157, 172, 175, 178, 183, 187, 190, 191, 200, 204, 206, 212, 217, 221, 239, 240, 260, 271, 293, 308, 318, 329, 337, 355, 359, 373, 377, 380, 381, 388, 392, 395, 402, 420

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

Cf. A085937.

Sequence in context: A322951 A156446 A032685 * A226179 A030570 A039560

Adjacent sequences: A085933 A085934 A085935 * A085937 A085938 A085939

Keyword

base,easy,nonn,changed

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