OFFSET
1,3
COMMENTS
a(16) > 10^5. - Robert Price, Jul 21 2018
MATHEMATICA
Select[Range@ 2000, PrimeQ[(2^# - 1)^4 + 2] &] (* Michael De Vlieger, Jun 11 2018 *)
PROG
(PARI) is(n)=ispseudoprime((2^n-1)^4+2)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Patrick C. Schneider, Jun 11 2018
EXTENSIONS
a(14) from Vaclav Kotesovec, Jun 16 2018
a(15) from Robert Price, Jun 20 2018
STATUS
approved