A121939 Palindromic numbers that contain the sum of their digits as a substring.

1, 2, 3, 4, 5, 6, 7, 8, 9, 919, 1881, 8118, 9229, 10801, 11711, 12621, 13531, 14441, 15351, 16261, 17171, 18081, 21612, 25152, 27972, 28882, 29792, 31513, 33133, 41014, 41114, 41214, 41314, 41414, 41514, 41614, 41714, 41814, 41914, 51315

Offset: 1

Author

Tanya Khovanova, Sep 03 2006

Keywords

• nonn
• base

Crossrefs

Cf. Palindromic subsequence of A052018 - Sum of digits of n is substring of n.

Programs

Mathematica

Select[Table[n, {n, 100000}], Length[StringPosition[ToString[ # ], ToString[Plus @@ IntegerDigits[ # ]]]] > 0 && ToString[ # ] == StringReverse[ToString[ # ]] &]