OFFSET
1,1
COMMENTS
a(49) > 10^5.
The first 5 primes associated with this sequence are: 103, 457, 9817, 65707, 5220997.
LINKS
C. K. Caldwell, The Prime Glossary, multifactorial prime
C. Caldwell and H. Dubner (Eds): The top ten prime numbers: from the unpublished collections of R. Ondrejka (May 2001), Table 21 F, p. 75.
Ken Davis, Status of Search for Multifactorial Primes.
Joe McLean, Interesting Sources of Probable Primes
MATHEMATICA
MultiFactorial[n_, k_] := If[n < 1, 1, n*MultiFactorial[n - k, k]];
Select[Range[1000], (x = MultiFactorial[#, 4] - 128; x > 0 && PrimeQ[x]) &]
Select[Range[10, 90000], PrimeQ[Times@@Range[#, 1, -4]-128]&] (* Harvey P. Dale, May 13 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Robert Price, Nov 07 2019
STATUS
approved