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 A127441 #17 Nov 22 2021 10:05:56 %S A127441 3,7,8,13,23,24,31,113,114,115,116 %N A127441 Numbers n such that between n and n+sqrt(n) there are no primes. %C A127441 If Oppermann's conjecture is true, then all terms are nonsquares. Data from A002386 and A005250 show that a(12) > 6787988999657777797 if it exists. Most likely there are no further terms. - _Chai Wah Wu_, Mar 08 2019 %H A127441 Wikipedia, <a href="https://en.wikipedia.org/wiki/Oppermann%27s_conjecture">Oppermann's conjecture</a> %t A127441 a = {}; Do[If[PrimePi[x + x^(1/2)] - PrimePi[x] == 0, AppendTo[a, x]], {x, 1, 249900000000000}]; a %o A127441 (PARI) isok(n) = primepi(n+sqrtint(n)) == primepi(n); \\ _Michel Marcus_, Nov 07 2013 %Y A127441 Cf. A000720, A002386, A005250, A028392. %K A127441 nonn,more %O A127441 1,1 %A A127441 _Artur Jasinski_, Jan 14 2007