7-tuples giving the number of primes less than 10^n of the forms 14k+1, 14k+3,…, 14k+13.
0, 1, 1, 1, 0, 0, 0, 3, 5, 5, 1, 3, 3, 4, 28, 30, 29, 1, 26, 26, 27, 203, 209, 211, 1, 202, 202, 200, 1593, 1613, 1604, 1, 1583, 1601, 1596, 13063, 13105, 13105, 1, 13064, 13069, 13090, 110653, 110815, 110787, 1, 110770, 110776, 110776, 960023, 960213, 960379
1
T. D. Noe, Plot of 9 7-tuples
T. D. Noe, Table of 9 7-tuples
(Mma) a = 14; t = Table[cnt = 0; k = 0; t = Table[lim = 10^n; While[a*k + b < lim, If[PrimeQ[a*k + b], cnt++]; k++]; cnt, {n, 7}], {b, 1, a, 2}]; Flatten[Transpose[t]]
nonn,tabl
T. D. Noe, Mar 06 2015