A046488 Palindromes that are the sum of the first n palindromes for some n.

1, 3, 6, 111, 353, 7557, 2376732

Offset

1,2

Comments

No additional terms up through the partial sums of all palindromes less than or equal to 10^7-1. - Harvey P. Dale, Jun 23 2018

Links

Table of n, a(n) for n=1..7.

P. De Geest, World!Of Numbers

Formula

a(n) = A046489(A046486(n)-1). - R. J. Mathar, Sep 09 2015

Example

a(4) = 111 as 111 = 1+2+3+4+5+6+7+8+9+11+22+33.

Mathematica

palQ[n_] := Reverse[x = IntegerDigits[n]] == x; Select[Accumulate[Select[Range[25000], palQ]], palQ] (* Jayanta Basu, Jun 26 2013 *)
Select[Accumulate[Select[Range[10^6], PalindromeQ]], PalindromeQ] (* Requires Mathematica version 10 or later *) (* Harvey P. Dale, Jun 23 2018 *)

Crossrefs

Cf. A002113, A046486, A046487.

Sequence in context: A101574 A082980 A157536 * A074880 A225884 A115647

Adjacent sequences: A046485 A046486 A046487 * A046489 A046490 A046491

Keyword

nonn,hard,base

Author

Patrick De Geest, Sep 15 1998

Extensions

Edited by Jonathan Sondow, Nov 28 2017

Status

approved