login
A288886
Primes of the form k!3 + 3^10, where k!3 is the triple factorial number (A007661).
1
59051, 59053, 59077, 59929, 608667049, 3091650738235049, 262134882788466747049, 17994728558292550488813850298696914425610240059049, 113024723205613715155108333435313153533542400059049
OFFSET
1,1
LINKS
MATHEMATICA
MultiFactorial[n_, k_] := If[n<1, 1, n*MultiFactorial[n-k, k]];
Select[Table[MultiFactorial[i, 3] + 3^10, {i, 0, 100}], PrimeQ[#]&]
Select[Table[Times@@Range[n, 1, -3]+59049, {n, 150}], PrimeQ] (* Harvey P. Dale, May 03 2020 *)
CROSSREFS
Cf. A261145.
Sequence in context: A017566 A352038 A321814 * A210172 A333056 A224972
KEYWORD
nonn
AUTHOR
Robert Price, Jun 18 2017
STATUS
approved