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 A110979 #13 Aug 10 2023 12:25:51 %S A110979 1,4,9,16,196,839056,7796654478001 %N A110979 Squares equal to the sum of the first k primes minus 1. %C A110979 No more terms < 7472966967498, sum of first 10^6 primes minus 1. - _Ray Chandler_, Oct 07 2005 %t A110979 Select[Accumulate[Prime[Range[1000]]]-1,IntegerQ[Sqrt[#]]&] (* _Harvey P. Dale_, Jun 09 2022 *) %o A110979 (PARI) lista(nn) = my(s=-1); forprime(p=2, nn, s+=p; if(issquare(s), print1(s, ", "))) \\ _Jinyuan Wang_, Aug 10 2023 %Y A110979 Cf. A007504, A110997. %Y A110979 Intersection of A000290 and A237589. %K A110979 nonn,hard,more %O A110979 1,2 %A A110979 _Giovanni Teofilatto_, Sep 30 2005 %E A110979 a(6) corrected by _Ray Chandler_, Oct 07 2005 %E A110979 a(7) from _Jinyuan Wang_, Aug 10 2023