login
A104083
Smallest prime >= 5^n.
1
2, 5, 29, 127, 631, 3137, 15629, 78137, 390647, 1953151, 9765629, 48828139, 244140683, 1220703131, 6103515637, 30517578167, 152587890649, 762939453127, 3814697265637, 19073486328181, 95367431640673, 476837158203149
OFFSET
0,1
FORMULA
a(n)=A054321(n), n>1. [From R. J. Mathar, Dec 13 2008]
MATHEMATICA
Join[{2, 5}, NextPrime[5^Range[2, 30]]] (* Harvey P. Dale, Feb 23 2016 *)
PROG
(PARI) g(n, b) = for(x=0, n, print1(nextprime(b^x)", "))
CROSSREFS
Sequence in context: A357199 A257545 A073715 * A257163 A327765 A243276
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Mar 03 2005
STATUS
approved