OFFSET
1,1
COMMENTS
a(16) > 50000. - Robert Price, Jan 02 2015
LINKS
The OpenPFGW Project, Primality Tester
MATHEMATICA
lst={}; Do[If[PrimeQ[n!!+2^5], AppendTo[lst, n]], {n, 0, 50000}]; lst
Select[Range[400], PrimeQ[#!!+32]&] (* Harvey P. Dale, Jul 22 2021 *)
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Zak Seidov, Nov 02 2002
EXTENSIONS
Edited and checked (n<4096) by Hugo Pfoertner, Jun 19 2003
STATUS
approved