login
Next prime after 3^n.
7

%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