A046489 Sum of the first n palindromes (A002113).
1, 3, 6, 10, 15, 21, 28, 36, 45, 56, 78, 111, 155, 210, 276, 353, 441, 540, 641, 752, 873, 1004, 1145, 1296, 1457, 1628, 1809, 2000, 2202, 2414, 2636, 2868, 3110, 3362, 3624, 3896, 4178, 4470, 4773, 5086, 5409, 5742, 6085, 6438, 6801, 7174, 7557, 7950, 8354
Offset: 0
Links
- Harvey P. Dale, Table of n, a(n) for n = 0..1000
- P. De Geest, World!Of Numbers
Programs
-
Mathematica
palQ[n_] := Reverse[x = IntegerDigits[n]] == x; Accumulate[Select[Range[410], palQ]] (* Jayanta Basu, Jun 26 2013 *)