A281448 Initial primes of 9 consecutive primes with consecutive gaps 2, 4, 6, 8, 10, 12, 14, 16.

113575727, 232728647, 2426256797, 2469604721, 3344410367, 4656098957, 4952808461, 6369321857, 6430890287, 6760087151, 8518049207, 10818813737, 13195845317, 19684555061, 21884908931, 23953276661, 25509639137, 26367829331, 26390212061, 31004257211

Offset: 1

Author

Harvey P. Dale, Jan 27 2017

Keywords

• nonn

Links

• Charles R Greathouse IV, Table of n, a(n) for n = 1..174

Crossrefs

Cf. A078847, A190814, A190817, A190819, A190838.

Programs

Mathematica

Select[Partition[Prime[Range[20*10^7]], 9, 1], Differences[#] == 2*Range[8] &][[All, 1]]

PARI

g=0; p=2; forprime(q=3,, if(q-p==g+2, g+=2; if(g==16, print1(q-72", "); g=0), g=0); p=q) \\ Charles R Greathouse IV, Jan 28 2017

Extensions

a(10)-a(20) from Charles R Greathouse IV, Jan 28 2017