login

Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.

A289822
Primes of the form k!3-2187, where k!3 is the triple factorial number (A007661).
1
1453, 10133, 56053, 1104373, 24342133, 96340213, 2504900213, 3091650738173813, 1668492340691778657530675197813, 116346745870073113470947277571643877742200278220799997813, 10027451552263982384838074729160019340604318179653944179011587407871999999997813
OFFSET
1,1
LINKS
MATHEMATICA
MultiFactorial[n_, k_] := If[n<1, 1, n*MultiFactorial[n-k, k]];
Select[Table[MultiFactorial[i, 3] - 2187, {i, 13, 100}], PrimeQ[#]&]
Select[Table[Times@@Range[n, 1, -3]-2187, {n, 13, 200}], PrimeQ] (* Harvey P. Dale, Jul 15 2023 *)
CROSSREFS
Cf. A267382.
Sequence in context: A020396 A052237 A031613 * A145529 A203393 A235771
KEYWORD
nonn
AUTHOR
Robert Price, Jul 12 2017
STATUS
approved