OFFSET
1,2
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(20)-a(21) from Bruno Berselli, Oct 04 2012
a(22)-a(23) from Michael S. Branicky, Apr 30 2023
a(24)-a(27) from Michael S. Branicky, Sep 19 2024
STATUS
approved