A090120 Numbers k such that nextprime(k^2) - prevprime(k^2) = 4.
3, 4, 9, 10, 14, 15, 20, 21, 26, 33, 40, 110, 117, 124, 146, 206, 237, 250, 273, 303, 309, 326, 340, 350, 387, 429, 436, 440, 441, 447, 470, 513, 561, 573, 609, 634, 686, 704, 807, 897, 920, 1004, 1035, 1054, 1060, 1071, 1113, 1124, 1143, 1156, 1233, 1239
Offset: 1
Keywords
Examples
k = 3 is a term since, k^2 = 9 is surrounded by the closest primes: {7,[9],11}. k = 10 is a term since k^2 = 100 is surrounded by {97,[100],101}.
Links
- Amiram Eldar, Table of n, a(n) for n = 1..10000
Crossrefs
Programs
-
Mathematica
Select[Range[3,1500], NextPrime[#^2] == NextPrime[#^2, -1] + 4 &] (* Giovanni Resta, May 26 2018 *)
-
PARI
isok(n) = nextprime(n^2) - precprime(n^2) == 4; \\ Michel Marcus, May 26 2018
Comments