|
%I #5 Jun 07 2017 19:16:59
%S 11,13,233,394249,13404169,24663654409,311607296009,1282510028809,
%T 37455569511954513920009,1717927167842495286476800009,
%U 182100279791304500366540800009,131285558488477016219820351299780608000009,453537748960814664854433903259753397239152640000009
%N Primes of the form k!6+9, where k!6 is the sextuple factorial number (A085158).
%H Robert Price, <a href="/A288304/b288304.txt">Table of n, a(n) for n = 1..19</a>
%H Henri& Renaud Lifchitz, <a href="http://www.primenumbers.net/prptop/searchform.php?form=n6+9&action=Search">PRP Records.Search for n!6+9.</a>
%H Joe McLean, <a href="http://web.archive.org/web/20091027034731/http://uk.geocities.com/nassarawa%40btinternet.com/probprim2.htm">Interesting Sources of Probable Primes</a>
%H OpenPFGW Project, <a href="http://sourceforge.net/projects/openpfgw/">Primality Tester</a>
%t MultiFactorial[n_,k_]:=If[n<1,1,n*MultiFactorial[n-k,k]];
%t Select[Table[MultiFactorial[i,6]+9, {i,0,100}], PrimeQ[#]&]
%Y Cf. A288154.
%K nonn
%O 1,1
%A _Robert Price_, Jun 07 2017
| 