|
|
A289634
|
|
Primes of the form k!3-3, where k!3 is the triple factorial number (A007661).
|
|
1
|
|
|
7, 277, 877, 3637, 58237, 24344317, 17041023997, 44656330909544934316361777151999997, 3304568487306325139410771509247999997, 17994728558292550488813850298696914425610239999997, 2136063198892150618502015301628828867230815945271103455231999999997
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
MATHEMATICA
|
MultiFactorial[n_, k_] := If[n<1, 1, n*MultiFactorial[n-k, k]];
Select[Table[MultiFactorial[i, 3] - 3, {i, 4, 100}], PrimeQ[#]&]
Select[Table[Times@@Range[n, 1, -3]-3, {n, 2, 200}], PrimeQ] (* Harvey P. Dale, Nov 25 2022 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|