login
Primes of the form floor((9/8)^k).
2

%I #16 Feb 14 2015 21:09:24

%S 2,3,5,7,11,13,19,43,61,457,823,1319,1669,2113,2377,4283,15649,28201,

%T 40153,763027,1957763,3968947,5023199,5651099,14499503,16311941,

%U 23225401,52970111,172010957,5890223681,17002175293,226913316467

%N Primes of the form floor((9/8)^k).

%H Charles R Greathouse IV, <a href="/A067910/b067910.txt">Table of n, a(n) for n = 1..70</a>

%t Union[Select[Floor/@((9/8)^Range[250]),PrimeQ]] (* _Harvey P. Dale_, Feb 19 2011 *)

%o (PARI) for(n=1, 18315, if(ispseudoprime(t=floor((9/8)^n)), print1(t", "))); v \\ _Charles R Greathouse IV_, Feb 17 2011

%K nonn

%O 1,1

%A _Benoit Cloitre_, Mar 03 2002