login
A113168
a(n) is the sum of digits of the first n palindromes.
1
0, 1, 3, 6, 10, 15, 21, 28, 36, 45, 47, 51, 57, 65, 75, 87, 101, 117, 135, 137, 140, 144, 149, 155, 162, 170, 179, 189, 200, 204, 209, 215, 222, 230, 239, 249, 260, 272, 285, 291, 298, 306, 315, 325, 336, 348, 361, 375, 390, 398, 407, 417, 428, 440, 453, 467, 482, 498
OFFSET
1,3
LINKS
EXAMPLE
First twelve base 10 palindromes are 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 11, 22. Sum of their digits is 0+1+2+3+4+5+6+7+8+9+1+1+2+2 = 51, hence a(12) = 51.
MATHEMATICA
With[{pals=Select[Range[0, 500], #==IntegerReverse[#]&]}, Table[ Total[ Flatten[ IntegerDigits/@ Take[ pals, n]]], {n, Length[pals]}]] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Dec 14 2016 *)
CROSSREFS
Partial sums of A043269.
Sequence in context: A217627 A037123 A062918 * A341192 A071817 A033442
KEYWORD
nonn,base
AUTHOR
Giovanni Teofilatto, Jan 06 2006
EXTENSIONS
Edited and extended by Klaus Brockhaus, Jan 06 2006
STATUS
approved