|
%I #24 Jul 22 2021 12:09:49
%S 5,7,9,11,15,21,33,41,43,45,67,93,117,327,363
%N Numbers n such that n!! + 2^5 is prime.
%C a(16) > 50000. - _Robert Price_, Jan 02 2015
%H The OpenPFGW Project, <a href="http://www.primeform.net/openpfgw/">Primality Tester</a>
%t lst={}; Do[If[PrimeQ[n!!+2^5], AppendTo[lst, n]], {n, 0,50000}]; lst
%t Select[Range[400],PrimeQ[#!!+32]&] (* _Harvey P. Dale_, Jul 22 2021 *)
%Y Cf. A006882, A080778 and A076185, A076186, A076188, A076189, A076193, A076194, A076195, A076196, A076197 for other values of s in n!! + 2^s.
%K nonn,more
%O 1,1
%A _Zak Seidov_, Nov 02 2002
%E Edited and checked (n<4096) by _Hugo Pfoertner_, Jun 19 2003
|
