OFFSET
1,1
LINKS
Giovanni Resta, Table of n, a(n) for n = 1..50
FORMULA
a(n) = exp(n + 1 + o(1)). - Charles R Greathouse IV, Oct 15 2016
EXAMPLE
pi(37)=12 and a(3)=37 is the smallest prime >= 3*12.
MATHEMATICA
Prime[Join[{k = 1}, Table[While[Prime[k]/k < n, k++]; k, {n, 2, 18}]]] (* Jayanta Basu, Jul 10 2013 *)
PROG
(PARI) k=n=1; forprime(p=2, , while(p/k>=n, print1(p", "); n++); k++) \\ Charles R Greathouse IV, Oct 15 2016
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
Edited by N. J. A. Sloane, Jun 30 2008 at the suggestion of R. J. Mathar
a(24)-a(28) from David W. Wilson, Apr 25 2017
a(29)-a(50) obtained from the values of A038625 computed by Jan Büthe. - Giovanni Resta, Sep 01 2018
STATUS
approved