OFFSET
1,1
FORMULA
prime(j) such that (prime(j+1)-prime(j))/log(prime(j)) > 5.
EXAMPLE
If p=492113 then r=492227 and (r-p)/log(p) = 114/log(492113) = 8.69799..., so 492113 is in the sequence.
MATHEMATICA
Do[s=(Prime[n+1]-Prime[n])/Log[Prime[n]]//N; If[s>5, Print[Prime[n]]], {n, 1, 50000}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 17 2003
STATUS
approved