OFFSET
1,1
COMMENTS
a(n) > 2^(n+1); in fact a(n) = 2 * first prime which exceeds 2^n.
FORMULA
a(n) = 2 * A014210(n).
MATHEMATICA
k = 2; Do[ While[ PrimeQ[ k ] || FactorInteger[ k ] [[ -1, 1 ] ] <= k^(n/(n + 1)), k++ ]; Print[ k ], {n, 1, 35} ]
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 14 2001
STATUS
approved