|
%I #10 Oct 31 2017 04:59:36
%S 2,3,113,1637,2971,44293,305663,1133071,370261,1357201,46006769,
%T 268119517,291057379,3429782117,10502593103,10926444583,87241770619,
%U 226751019497,1901687257447
%N Prime(A215237).
%C We use offset 0 because A215237 uses that offset.
%C a(n) is least prime(k) such that there are exactly n primes between prime(k)/2 and prime(k+1)/2. - _Peter Munn_, Oct 22 2017
%F a(n) = A000040(A215237(n)).
%t t = Table[PrimePi[Prime[n + 1]/2] - PrimePi[Prime[n]/2], {n, 100000}]; t2 = Flatten[Table[Position[t, n, 1, 1], {n, 0, 8}]]; Prime[t2]
%Y Cf. A000040, A080192, A104380, A215237.
%K nonn,hard
%O 0,1
%A _T. D. Noe_, Oct 11 2012
%E a(14)-a(18) from _Donovan Johnson_, Oct 13 2012
|
