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 A180436 #32 Jun 14 2018 15:29:53 %S A180436 1,4,5,9,55,77,121,181,313,434,484,505,545,595,636,676,818,1001,1111, %T A180436 1441,1771,4334,6446,10201,12321,14641,17371,17871,19691,21712,40804, %U A180436 41214,42924,44444,44944,46564,51015,65756,69696,81818,94249,97679,99199 %N A180436 Palindromic numbers which are sum of consecutive squares. %C A180436 In more than one way: 554455, 9343439, ... (A267600) - _Robert G. Wilson v_, May 28 2012 %H A180436 Giovanni Resta, <a href="/A180436/b180436.txt">Table of n, a(n) for n = 1..10400</a> (terms < 10^18, first 228 terms from Robert G. Wilson v) %e A180436 1001 is in the sequence because 1001 is palindromic and it can be written as sum of consecutive squares (1001 = 4^2 + 5^2 + 6^2 + ... + 13^2 + 14^2). %t A180436 palQ[n_Integer] := Block[{idn = IntegerDigits[n]}, idn == Reverse[idn]]; lst = {}; k = 1; While[k < 1000, AppendTo[lst, Select[ Accumulate[ Range[k, 1000]^2], palQ]]; lst = Union@ Flatten@ lst; k++]; Select[lst, # < 10^6 &] (* _Robert G. Wilson v_, May 28 2012 *) %Y A180436 Cf. A002113, A002779, A034705, A216446, A267600. %K A180436 nonn,easy,base %O A180436 1,2 %A A180436 _Zhining Yang_, Jan 19 2011