%I #15 May 25 2019 17:24:23

%S 1,2,30,259,429,4612,26466,88110,31545,104071,2775456,14614604,

%T 15793779,164082567,476853784,495207013,3613011290,9032608100,

%U 69827848342

%N Least number k for which primepi(prime(k+1)/2) - primepi(prime(k)/2) = n.

%C See A215238 and A215239 for prime(a(n)) and the next prime.

%C Equivalently stated, a(n) is least k such that there are exactly n primes between prime(k)/2 and prime(k+1)/2. - _Peter Munn_, May 20 2019

%e For n = 2, the consecutive primes are 113 and 127; there are two primes between 56.5 and 63.5. For n = 3, the consecutive primes are 1637 and 1657; there are three primes between 818.5 and 828.5.

%t t = Table[PrimePi[Prime[n+1]/2] - PrimePi[Prime[n]/2], {n, 100000}]; Flatten[Table[Position[t, n, 1, 1], {n, 0, 8}]]

%Y Cf. A217564, A215238, A215239.

%K nonn,more,hard

%O 0,2

%A _T. D. Noe_, Oct 09 2012

%E a(14)-a(18) from _Donovan Johnson_, Oct 13 2012