OFFSET
1,1
LINKS
Harvey P. Dale, Table of n, a(n) for n = 1..1000
FORMULA
prime(j) such that (prime(j+1)-prime(j))/log(prime(j)) > 2.
EXAMPLE
If p=1327 then r=1361 and (r-p)/log(p) = 34/log(1327) = 4.72834..., so 1327 is in the sequence.
MATHEMATICA
Do[s=(Prime[n+1]-Prime[n])/Log[Prime[n]]//N; If[s>2, Print[Prime[n]]], {n, 1, 2000}]
Transpose[Select[Partition[Prime[Range[600]], 2, 1], (Last[#]-First[#])/ Log[ First[#]]>2&]][[1]] (* Harvey P. Dale, Jun 22 2014 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 17 2003
STATUS
approved