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 A025297 #17 Aug 05 2021 07:31:37 %S A025297 5525,9425,11050,12025,12325,13325,14365,15725,17225,17425,18785, %T A025297 18850,19825,21125,22100,22525,23725,24050,24505,24650,25925,26650, %U A025297 26825,27625,28730,28925,29725,31025,31265,31450,31525,32045,32825,34450,34645,34850 %N A025297 Numbers that are the sum of 2 nonzero squares in 6 or more ways. %H A025297 Robert Price, <a href="/A025297/b025297.txt">Table of n, a(n) for n = 1..507</a> %H A025297 <a href="/index/Su#ssq">Index entries for sequences related to sums of squares</a> %t A025297 nn = 34850; t = Table[0, {nn}]; lim = Floor[Sqrt[nn - 1]]; Do[num = i^2 + j^2; If[num <= nn, t[[num]]++], {i, lim}, {j, i}]; Flatten[Position[t, _?(# >= 6 &)]] (* _T. D. Noe_, Apr 07 2011 *) %Y A025297 Cf. A025289, A025296, A025298, A025334. %K A025297 nonn %O A025297 1,1 %A A025297 _David W. Wilson_