Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #47 Jun 24 2014 02:44:27
%S 2,3,5,7,11,13,19,29,41,59,89,131,197,293,439,659,991,1481,2221,3329,
%T 4993,7487,11239,16843,25253,37879,56821,85223,127837,191773,287629,
%U 431441,647161,970747,1456121,2184179,3276253,4914373,7371571,11057357,16586039,24879017,37318507,55977767
%N Smallest prime > (3/2)^n.
%H Robert G. Wilson v, <a href="/A242738/b242738.txt">Table of n, a(n) for n = 1..1000</a>
%F a(n) = A242734(n) + floor((3/2)^n).
%F a(n) = A151800(A002379(n)). - _Michel Marcus_, Jun 20 2014
%t f[n_] := NextPrime[(3/2)^n]; Array[f, 40] (* _Robert G. Wilson v_, Jun 20 2014 *)
%o (PARI) a(n) = nextprime(3^n/2^n); \\ _Michel Marcus_, Jun 21 2014
%Y Cf. A242734.
%K nonn
%O 1,1
%A _Pierre CAMI_, May 21 2014