A067907 Primes of the form floor((6/5)^k).
2, 3, 5, 7, 31, 79, 137, 197, 2539, 7583, 119257883, 7900521439, 5715680753274209, 454378599506401699, 545254319407682039, 556527288873434664371, 961679155173295100033, 12347176242987457664783
Offset: 1
Keywords
Links
- Charles R Greathouse IV, Table of n, a(n) for n = 1..43
Programs
-
Mathematica
Select[Floor[(6/5)^Range[500]],PrimeQ]//Union (* Harvey P. Dale, Mar 09 2025 *)
-
PARI
v=vector(43); i=0; for(n=1, 12629, if(ispseudoprime(t=floor((6/5)^n)), v[i++]=t)); v \\ Charles R Greathouse IV, Feb 17 2011