A332240 Palindromes that are the sum of a number and the sum of its digits.

0, 2, 4, 6, 8, 11, 22, 33, 44, 55, 66, 77, 88, 99, 101, 111, 131, 141, 151, 161, 171, 181, 191, 202, 212, 232, 242, 252, 262, 272, 282, 292, 303, 313, 333, 343, 353, 363, 373, 383, 393, 404, 414, 434, 444, 454, 464, 474, 484, 494, 505, 515, 535, 545, 555, 565, 575

Offset

1,2

Links

Chai Wah Wu, Table of n, a(n) for n = 1..10000

Formula

a(n) in { A062028(A229545(i)) : i >= 1 }. - Amiram Eldar, Feb 12 2020

Example

196 + 1 + 9 + 6 = 212, so 212 is in this sequence.

Mathematica

palQ[n_] := Block[{d = IntegerDigits[n]}, Reverse[d] == d]; Select[ Union[(# + Plus @@ IntegerDigits@#) & /@ Range[0, 600]], # <= 600 && palQ[#] &] (* Giovanni Resta, Feb 07 2020 *)

Prog

(Magma) pal:=func<n|Seqint(Intseq(n)) eq Seqint(Reverse(Intseq(n)))>; [k:k in [0..600]| pal(k) and exists(m){s:s in [0..k]| s+&+Intseq(s) eq k}]; // Marius A. Burtea, Feb 08 2020

Crossrefs

Intersection of A002113 and A176995.

Cf. A062028, A229545.

Sequence in context: A353007 A071241 A247123 * A068062 A088169 A061563

Adjacent sequences: A332237 A332238 A332239 * A332241 A332242 A332243

Keyword

nonn,base

Author

Eric Fox, Feb 07 2020

Extensions

More terms from Giovanni Resta, Feb 07 2020

Status

approved