This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A046488 #21 Aug 11 2024 14:41:31 %S A046488 1,3,6,111,353,7557,2376732 %N A046488 Palindromes that are the sum of the first n palindromes for some n. %C A046488 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 %H A046488 P. De Geest, <a href="https://www.worldofnumbers.com/index.html">World!Of Numbers</a> %F A046488 a(n) = A046489(A046486(n)-1). - _R. J. Mathar_, Sep 09 2015 %e A046488 a(4) = 111 as 111 = 1+2+3+4+5+6+7+8+9+11+22+33. %t A046488 palQ[n_] := Reverse[x = IntegerDigits[n]] == x; Select[Accumulate[Select[Range[25000], palQ]], palQ] (* _Jayanta Basu_, Jun 26 2013 *) %t A046488 Select[Accumulate[Select[Range[10^6],PalindromeQ]],PalindromeQ] (* Requires Mathematica version 10 or later *) (* _Harvey P. Dale_, Jun 23 2018 *) %Y A046488 Cf. A002113, A046486, A046487. %K A046488 nonn,hard,base %O A046488 1,2 %A A046488 _Patrick De Geest_, Sep 15 1998 %E A046488 Edited by _Jonathan Sondow_, Nov 28 2017