%I #12 Apr 24 2020 04:07:09
%S 2,5,11,29,83,251,733,2203,6563,19687,59051,177167,531457,1594331,
%T 4782971,14348909,43046747,129140197,387420499,1162261523,3486784409,
%U 10460353259,31381059613,94143178859,282429536483,847288609457
%N Next prime after 3^n.
%H Amiram Eldar, <a href="/A014211/b014211.txt">Table of n, a(n) for n = 0..2096</a>
%t NextPrime[ n_Integer] := (k = n + 1; While[ !PrimeQ[k], k++ ]; k); Table[ NextPrime[3^n], {n, 0, 35} ]
%t NextPrime[3^Range[0,30]] (* _Harvey P. Dale_, Feb 26 2013 *)
%Y Cf. A000244, A014210.
%K nonn
%O 0,1
%A _N. J. A. Sloane_.
%E More terms from _Robert G. Wilson v_, Aug 14 2001