A085932 Numbers k such that (digits of k sorted in ascending order) + (digital sum of k) is a palindrome.

1, 2, 3, 4, 10, 20, 30, 40, 100, 124, 129, 142, 148, 167, 176, 184, 192, 200, 214, 219, 224, 229, 241, 242, 248, 267, 276, 284, 291, 292, 300, 348, 367, 376, 384, 400, 412, 418, 421, 422, 428, 438, 448, 467, 476, 481, 482, 483, 484, 567, 576, 617, 627, 637

Offset

1,2

Links

Table of n, a(n) for n=1..54.

Example

142 is a term because the digits of 142 in ascending order are 124, the digital sum of 124 is 7, and 124 + 7 = 131, a palindrome.

Mathematica

dspQ[n_]:=Module[{sidn=Sort[IntegerDigits[n]], pidn}, pidn= IntegerDigits[ FromDigits[ sidn]+ Total[ sidn]]; pidn==Reverse[pidn]]; Select[Range[ 700], dspQ] (* Harvey P. Dale, Jul 19 2011 *)

Crossrefs

Cf. A085933, A085934, A085935.

Sequence in context: A145028 A306107 A229545 * A214283 A135056 A132135

Adjacent sequences: A085929 A085930 A085931 * A085933 A085934 A085935

Keyword

base,easy,nonn,changed

Author

Jason Earls and Amarnath Murthy, Jul 14 2003

Status

approved