A248373 Partial sums of primes of form n^2 + (n+1)^2 + (n+2)^2 (A027864).
5, 34, 183, 692, 1369, 3246, 6923, 15352, 25101, 37010, 50479, 68268, 90977, 118054, 146283, 191672, 238549, 291618, 361847, 433924, 515601, 616070, 718747, 832824, 961373, 1102642, 1257231, 1437308, 1629337, 1824414, 2031923, 2255512, 2485701, 2746778, 3059767
Offset: 1
Keywords
Links
- Harvey P. Dale, Table of n, a(n) for n = 1..1000
Crossrefs
Cf. A027864.
Programs
-
Mathematica
f[x_]:=x^2+(x+1)^2+(x+2)^2; n=50;result={};counter=0;number=0; While[counter
Harvey P. Dale, Nov 24 2017 *) -
PARI
lista(nn) = {s = 0; for (n=0, nn, if (isprime(p=n^2 + (n+1)^2 + (n+2)^2), s +=p; print1(s, ", ")););} \\ Michel Marcus, Oct 06 2014