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 A046896 #16 Jan 18 2022 00:51:50 %S A046896 1,9,3969,5041,9409,89401,35010889,478953225,741091729,282110761881, %T A046896 370672751241,1930979822409,5548799536921,6445713623281,81193957971361 %N A046896 Square elements of A046895. %C A046896 No other terms in first 200000 terms of A046895, though sequence is believed to be infinite. %C A046896 No other terms in first 8000000 terms of A046895. - _T. D. Noe_, Mar 11 2009 %t A046896 s = 0; Reap[ Do[s = s + SquaresR[4, n]; If[IntegerQ[Sqrt[s]], Print[{n, s}]; Sow[s]], {n, 0, 5*10^6}]][[2, 1]] (* _Jean-François Alcover_, Jul 02 2012 *) %Y A046896 Cf. A046895. %K A046896 nonn,easy,nice %O A046896 0,2 %A A046896 _Vinay Vaishampayan_ and _N. J. A. Sloane_ %E A046896 Extended by _T. D. Noe_, Mar 11 2009