%I #15 Jun 12 2024 01:15:05
%S 2,3,4,5,6,7,21,22,98,106,164,189,219,364,443,670,775,1919,2204,2715,
%T 3692,4228,4912,10466,12300,14087,21659,28170,55832,66577,87309,87505,
%U 98144,167512,259517
%N n for which floor((3/2)^n) is prime.
%C No more terms through 500000. - _Ryan Propper_, Dec 28 2008
%D R. K. Guy, Unsolved Problems in Number Theory, E19
%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/PowerFloors.html">Power Floors</a>
%t Do[ If[ PrimeQ[ Floor[(3/2)^n]], Print[n]], {n, 1, 12500}]
%Y Cf. A070758, A067904, A070762.
%Y Indices of primes in A002379.
%K nonn
%O 1,1
%A _Eric W. Weisstein_, May 04 2002
%E One more term from _Ralf Stephan_, Oct 13 2002
%E Corrected and extended by _Robert G. Wilson v_, Jan 15 2003
%E More terms from _Ryan Propper_, Jan 25 2008
%E 6 more terms from _Ryan Propper_, Dec 28 2008