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 A166708 #2 Mar 30 2012 17:26:30 %S A166708 36,169,247590225 %N A166708 Squares in A105720. %e A166708 36=6^2=A105720(3), %e A166708 169=13^2=A105720(6), %e A166708 247590225=15735^2=A105720(4072) %e A166708 No more terms up to 35746494200563714=A105720(34769014). %t A166708 a=5;Do[a=a-Prime[n]+Prime[2n+1]+Prime[2n+2];If[IntegerQ[Sqrt[a]],Print[{a,n+1 }]],{n,1,10^8}]; %Y A166708 Cf. A105720, A166619, A166620. %K A166708 more,nonn,bref %O A166708 1,1 %A A166708 _Zak Seidov_, Oct 18 2009