OFFSET
1,2
COMMENTS
MATHEMATICA
Select[Range[5000], PrimeQ[8^# + 3] &]
PROG
(PARI) is(n)=ispseudoprime(8^n+3) \\ Charles R Greathouse IV, Feb 17 2017
CROSSREFS
KEYWORD
nonn
AUTHOR
Vincenzo Librandi, Oct 02 2012
EXTENSIONS
a(19)-a(32) are obtained from A057732; by Bruno Berselli, Oct 02 2012
STATUS
approved