A289492 Primes of the form k!4+16, where k!4 is the quadruple factorial number (A007662).

17, 19, 37, 61, 601, 65851, 40883551, 44358635491, 184874815141, 200200021673987500790641, 2442358029135994033939891, 13005556505149168230729834391, 85277434004263096088895523996891, 47579595706543208754134106245953141

Offset: 1

Author

Robert Price, Sep 02 2017

Keywords

• nonn

Links

• Robert Price, Table of n, a(n) for n = 1..18
• Henri& Renaud Lifchitz, PRP Records.Search for n!4+16.
• Joe McLean, Interesting Sources of Probable Primes
• OpenPFGW Project, Primality Tester

Crossrefs

Cf. A291344.

Programs

Mathematica

MultiFactorial[n_, k_] := If[n<1, 1, n*MultiFactorial[n-k, k]];
Select[Table[MultiFactorial[i, 4] + 16, {i, 0, 100}], PrimeQ[#]&]