OFFSET
1,1
COMMENTS
a(15) > 9500. - Jinyuan Wang, Mar 19 2020
MATHEMATICA
With[{c=2^31-1}, Select[Range[2500], PrimeQ[c 6^#-1]&]] (* Harvey P. Dale, Oct 22 2011 *)
PROG
(PARI) is(n)=ispseudoprime((2^31-1)*(6^n)-1) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Pierre CAMI, Oct 14 2004
EXTENSIONS
a(11)-a(14) from Jinyuan Wang, Mar 19 2020
a(15) from Michael S. Branicky, Apr 21 2023
a(16) from Michael S. Branicky, Jul 23 2024
STATUS
approved