OFFSET
1,2
MATHEMATICA
Do[If[PrimeQ[(12^n+7)], Print[n]], {n, 2000}]
PROG
(PARI) is(n)=ispseudoprime(12^n+7) \\ Charles R Greathouse IV, Jun 06 2017
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Feb 01 2008
EXTENSIONS
a(15)-a(17) from Jinyuan Wang, Mar 03 2020
a(18)-a(19) from Michael S. Branicky, Mar 15 2023
a(20) from Michael S. Branicky, Jul 28 2024
STATUS
approved