OFFSET
1,1
MATHEMATICA
Select[Range[10000], PrimeQ[6^# - 7] &]
PROG
(PARI) is(n)=ispseudoprime(6^n-7) \\ Charles R Greathouse IV, Jun 13 2017
CROSSREFS
KEYWORD
nonn,more,hard
AUTHOR
Vincenzo Librandi, Oct 02 2012
EXTENSIONS
a(26)-a(27) from Michael S. Branicky, Jan 29 2023
a(28)-a(29) from Michael S. Branicky, Apr 10 2023
STATUS
approved