OFFSET
0,1
LINKS
Amiram Eldar, Table of n, a(n) for n = 0..2096
MATHEMATICA
NextPrime[ n_Integer] := (k = n + 1; While[ !PrimeQ[k], k++ ]; k); Table[ NextPrime[3^n], {n, 0, 35} ]
NextPrime[3^Range[0, 30]] (* Harvey P. Dale, Feb 26 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Robert G. Wilson v, Aug 14 2001
STATUS
approved