OFFSET
1,1
FORMULA
MATHEMATICA
NextPrime[4^Range[30], -1] (* Paolo Xausa, Oct 28 2024 *)
PROG
(PARI) g(n, b) = for(x=0, n, print1(precprime(b^x)", "))
CROSSREFS
KEYWORD
easy,nonn,changed
AUTHOR
Cino Hilliard, Mar 03 2005
STATUS
approved