cp's OEIS Frontend

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.

Showing 1-2 of 2 results.

A122209 Sum of squares of the first n^2 primes = A024450[n^2].

Original entry on oeis.org

4, 87, 1556, 13275, 65796, 239087, 710844, 1789395, 4083404, 8384727, 16156884, 29194283, 50363460, 82888311, 132264452, 204330315, 306450780, 450504551, 647579748, 913503459, 1262033828, 1725350295, 2318488092, 3072687971
Offset: 1

Views

Author

Alexander Adamchuk, Aug 25 2006

Keywords

Comments

Prime a(n) are listed in A122210[n] = {239087,29194283,13459558559,2330212120559,591302115428891,...}. Corresponding numbers n such that a(n) is a prime are listed in A122211[n] = {6,12,30,66,156,180,228,336,366,...}.

Crossrefs

Programs

  • Mathematica
    Table[Sum[Prime[k]^2,{k,1,n^2}],{n,1,50}]
    Module[{nn=600,t},t=Accumulate[Prime[Range[nn]]^2];Table[t[[i]],{i,Range[ Floor[ Sqrt[nn]]]^2}]] (* Harvey P. Dale, Dec 21 2014 *)

Formula

a(n) = Sum[ Prime[k]^2, {k,1,n^2} ]. a(n) = A024450[n^2].

A122210 Primes in A122209[n].

Original entry on oeis.org

239087, 29194283, 13459558559, 2330212120559, 591302115428891, 1475383481009147, 6659290813076243, 78234869090622611, 134532153287171039, 1936272192837757871, 12491376574210826183, 25493310333833042507
Offset: 1

Views

Author

Alexander Adamchuk, Aug 26 2006

Keywords

Comments

Sum of squares of the first n^2 primes is A122209[n] = A024450[n^2] = {4,87,1556,13275,65796,239087,710844,1789395,4083404,8384727,16156884,29194283,...}. Corresponding numbers n such that A122209[n] is prime are listed in A122211[n] = {6,12,30,66,156,180,228,336,366,558,750,840,894,978,...}.

Crossrefs

Programs

  • Mathematica
    s=0;Do[p=Prime[n];k=Sqrt[n];s=s+p*p;If[PrimeQ[s]&&IntegerQ[k],Print[{k,n,s}]],{n,1,10^7}]

Formula

a(n) = A122209[ A122211(n) ] = A024450[ A122211(n)^2 ].
Showing 1-2 of 2 results.