OFFSET
1,1
COMMENTS
Remark: the quotient can be larger than 1/n at much larger primes, many times. So p does not set record in "standard" sense, only sinks first below 1/n, i.e. smaller than any previous values, but not necessarily smaller than the following ones. See also illustration.
FORMULA
EXAMPLE
a(1)=p(5)=11 and (13-11)/log(11) = 0.8340... < 1/1.
MATHEMATICA
{eq=1, k=1}; Do[s=(Prime[n+1]-Prime[n])/Log[Prime[n]]//N; If[s<1/k, k=k+1; Print[{k, n, Prime[n], s}]; eq=s], {n, 1, 100000000}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 17 2003
EXTENSIONS
a(11)-a(19) from Donovan Johnson, Sep 09 2008
STATUS
approved