OFFSET
0,1
MATHEMATICA
NextPrime[#]&/@(7^Range[0, 20]-1) (* Harvey P. Dale, Dec 20 2014 *)
PROG
(PARI) g(n, b) = for(x=0, n, print1(nextprime(b^x)", "))
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Cino Hilliard, Mar 03 2005
STATUS
approved