A218212 Number of primes up to 10^n that are the sum of six consecutive squares of nonnegative numbers.

0, 0, 4, 14, 29, 78, 225, 632, 1716, 4726, 13482, 38627, 112051, 327426, 959254, 2829346, 8391477, 24975616, 74606489, 223523560, 671611810

Offset: 1

Author

Martin Renner, Oct 23 2012

Keywords

• nonn
• base
• more

Comments

These are primes of the form 91 + 42*k + 6*k^2.

Crossrefs

Cf. A027866, A027867, A218208, A218210, A218211.

Programs

Mathematica

n = 0; cnt = 0; Table[While[n++; p = 91 + 42*n + 6*n^2; p < 10^e, If[PrimeQ[p], cnt++]]; n--; cnt, {e, 14}] (* T. D. Noe, Oct 23 2012, edited by Michael De Vlieger, Feb 18 2018 *)

Formula

a(n) = Sum_{k=1..n} A218211(k).

Extensions

a(13)-a(21) from Chai Wah Wu, Feb 12 2018

Changed terms (as A218211(2) is reverted back to 0) by Chai Wah Wu, Feb 13 2018