A076190 Numbers n such that n!! + 2^5 is prime.
5, 7, 9, 11, 15, 21, 33, 41, 43, 45, 67, 93, 117, 327, 363
Offset: 1
Links
- The OpenPFGW Project, Primality Tester
Crossrefs
Programs
-
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 *)
Extensions
Edited and checked (n<4096) by Hugo Pfoertner, Jun 19 2003
Comments