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 A025305 #17 Dec 08 2013 06:30:06 %S A025305 1105,1625,1885,2125,2210,2405,2465,2665,3145,3250,3445,3485,3625, %T A025305 3770,3965,4225,4250,4420,4505,4625,4745,4810,4930,5125,5185,5330, %U A025305 5365,5785,5945,6205,6290,6305,6409,6500,6565,6625,6890,6970,7085,7225,7250,7345 %N A025305 Numbers that are the sum of 2 distinct nonzero squares in exactly 4 ways. %C A025305 8450 is the first term in here but not in A025287 [R. Chandler, seqfan list, May 28 2008] [From _R. J. Mathar_, Nov 30 2008] %H A025305 Donovan Johnson, <a href="/A025305/b025305.txt">Table of n, a(n) for n = 1..1000</a> %H A025305 <a href="/index/Su#ssq">Index entries for sequences related to sums of squares</a> %t A025305 nn = 8450; t = Table[0, {nn}]; lim = Floor[Sqrt[nn - 1]]; Do[num = i^2 + j^2; If[num <= nn, t[[num]]++], {i, lim}, {j, i-1}]; Flatten[Position[t, 4]] (* _T. D. Noe_, Apr 07 2011 *) %K A025305 nonn %O A025305 1,1 %A A025305 _David W. Wilson_