This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A215239 #7 Oct 13 2012 04:22:17 %S A215239 3,5,127,1657,2999,44351,305717,1133131,370373,1357333,46006967, %T A215239 268119667,291057563,3429782399,10502593369,10926444847,87241771051, %U A215239 226751019863,1901687257829 %N A215239 Prime number following prime(A215237). %C A215239 We use offset 0 because A215237 uses that offset. %t A215239 t = Table[PrimePi[Prime[n + 1]/2] - PrimePi[Prime[n]/2], {n, 100000}]; t2 = Flatten[Table[Position[t, n, 1, 1], {n, 0, 8}]]; NextPrime[Prime[t2]] %Y A215239 Cf. A215237, A215238. %K A215239 nonn,hard %O A215239 0,1 %A A215239 _T. D. Noe_, Oct 11 2012 %E A215239 a(14)-a(18) from _Donovan Johnson_, Oct 13 2012