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
Examples
196 + 1 + 9 + 6 = 212, so 212 is in this sequence.
Links
- Chai Wah Wu, Table of n, a(n) for n = 1..10000
Programs
-
Magma
pal:=func
; [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 -
Mathematica
palQ[n_] := Block[{d = IntegerDigits[n]}, Reverse[d] == d]; Select[ Union[(# + Plus @@ IntegerDigits@#) & /@ Range[0, 600]], # <= 600 && palQ[#] &] (* Giovanni Resta, Feb 07 2020 *)
Formula
Extensions
More terms from Giovanni Resta, Feb 07 2020