OFFSET
1,1
COMMENTS
Primes preceded and followed by less-than-average prime gaps (by the Prime Number Theorem, see link).
LINKS
Eric Weisstein's World of Mathematics, Prime Number Theorem
EXAMPLE
n = 23 is not a term because 23 - 19 > log(23) = 3.13...
n = 71 is a term because log(71) = 4.71.. and 73 - log(71) < 71 < 67 + log(71).
MATHEMATICA
Select[Range[2, 220] // Prime, Max[ Abs[# - NextPrime[#, {-1, 1}]]] < Log[#] &] (* Giovanni Resta, Jun 19 2017 *)
PROG
(Sage) [n for n in prime_range(3, 1300) if next_prime(n)-n<log(n) and n-previous_prime(n)<log(n)] #
(PARI) is(n) = ispseudoprime(n) && n-precprime(n-1) < log(n) && nextprime(n+1)-n < log(n) \\ Felix Fröhlich, Jun 19 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Giuseppe Coppoletta, Jun 19 2017
STATUS
approved