%I #25 Feb 20 2018 11:56:20
%S 0,0,4,14,29,78,225,632,1716,4726,13482,38627,112051,327426,959254,
%T 2829346,8391477,24975616,74606489,223523560,671611810
%N Number of primes up to 10^n that are the sum of six consecutive squares of nonnegative numbers.
%C These are primes of the form 91 + 42*k + 6*k^2.
%F a(n) = Sum_{k=1..n} A218211(k).
%t 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 *)
%Y Cf. A027866, A027867, A218208, A218210, A218211.
%K nonn,base,more
%O 1,3
%A _Martin Renner_, Oct 23 2012
%E a(13)-a(21) from _Chai Wah Wu_, Feb 12 2018
%E Changed terms (as A218211(2) is reverted back to 0) by _Chai Wah Wu_, Feb 13 2018