A076188 Numbers k such that k!! + 2^3 is prime.
3, 5, 7, 9, 15, 17, 25, 41, 63, 79, 91, 103, 299, 341, 431, 445, 465, 519, 1251, 2469, 2507, 2549, 6817, 8519, 18983, 38715
Offset: 1
Links
- Henri & Renaud Lifchitz, PRP Records.
- OpenPFGW Project, Primality Tester
Crossrefs
Programs
-
Mathematica
lst={}; Do[If[PrimeQ[n!!+2^3], AppendTo[lst, n]], {n, 0, 50000}]; lst Select[Range[40000],PrimeQ[#!!+8]&] (* Harvey P. Dale, May 28 2021 *)
Extensions
Edited and extended (n<4096) by Hugo Pfoertner, Jun 19 2003
More terms from Herman Jamke (hermanjamke(AT)fastmail.fm), Jan 03 2008
a(25) from Robert Price, Nov 01 2012
a(26) from Robert Price, Jan 06 2015
Comments