A014211 Next prime after 3^n.

2, 5, 11, 29, 83, 251, 733, 2203, 6563, 19687, 59051, 177167, 531457, 1594331, 4782971, 14348909, 43046747, 129140197, 387420499, 1162261523, 3486784409, 10460353259, 31381059613, 94143178859, 282429536483, 847288609457

Offset: 0

Author

N. J. A. Sloane

Keywords

• nonn

Links

• Amiram Eldar, Table of n, a(n) for n = 0..2096

Crossrefs

Cf. A000244, A014210.

Programs

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 *)

Extensions

More terms from Robert G. Wilson v, Aug 14 2001