A329184 Numbers k such that k![4] - 1024 is prime, where k![4] = A007662(k) = quadruple factorial.
15, 19, 21, 25, 27, 33, 47, 51, 55, 85, 95, 153, 163, 187, 191, 315, 335, 363, 375, 419, 433, 669, 873, 1097, 1113, 1235, 1819, 1969, 2043, 2391, 2493, 3639, 4433, 5527, 6423, 9441, 14099, 24607, 27057, 62271, 98079
Offset: 1
Keywords
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
Programs
-
Mathematica
MultiFactorial[n_, k_] := If[n < 1, 1, n*MultiFactorial[n - k, k]]; Select[Range[1000], (x = MultiFactorial[#, 4] - 1024; x > 0 && PrimeQ[x]) &]
Comments