A067910 Primes of the form floor((9/8)^k).
2, 3, 5, 7, 11, 13, 19, 43, 61, 457, 823, 1319, 1669, 2113, 2377, 4283, 15649, 28201, 40153, 763027, 1957763, 3968947, 5023199, 5651099, 14499503, 16311941, 23225401, 52970111, 172010957, 5890223681, 17002175293, 226913316467
Offset: 1
Keywords
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..70
Programs
-
Mathematica
Union[Select[Floor/@((9/8)^Range[250]),PrimeQ]] (* Harvey P. Dale, Feb 19 2011 *)
-
PARI
for(n=1, 18315, if(ispseudoprime(t=floor((9/8)^n)), print1(t", "))); v \\ Charles R Greathouse IV, Feb 17 2011