OFFSET
1,3
COMMENTS
These are the primes of the form 91 + 42*k + 6*k^2.
MATHEMATICA
n = 0; Table[cnt = 0; 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 *)
CROSSREFS
KEYWORD
nonn,base,more
AUTHOR
Martin Renner, Oct 23 2012
EXTENSIONS
a(13)-a(21) from Chai Wah Wu, Feb 12 2018
a(2) changed back to 0 by Chai Wah Wu and N. J. A. Sloane, Feb 13 2018
STATUS
approved