A085937 Palindromes in A085936.

1, 2, 191, 212, 373, 535, 575, 737, 838, 10901, 15251, 20102, 24642, 25352, 30703, 39893, 42624, 50305, 50705, 51215, 52325, 70307, 80308, 93839, 1009001, 1052501, 1502051

Offset

1,2

Links

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

Example

212 belongs to this sequence because 212 sorted is 122 and the sum of the squares of the digits of 122 = 1^2 + 2^2 + 2^2= 9 and 122 + 9 = 131, a palindrome.

Mathematica

Select[Range[2*10^6], PalindromeQ[#]&&With[{d=Sort[IntegerDigits[#]]}, PalindromeQ[Total[d^2]+FromDigits[d]]]&] (* Harvey P. Dale, Jan 26 2025 *)

Crossrefs

Cf. A085936.

Sequence in context: A318195 A307587 A235680 * A142890 A201183 A103404

Adjacent sequences: A085934 A085935 A085936 * A085938 A085939 A085940

Keyword

base,easy,nonn,changed

Author

Jason Earls and Amarnath Murthy, Jul 14 2003

Status

approved