|
|
A289758
|
|
Primes of the form k!5-1, where k!5 is the quintuple factorial number (A085157).
|
|
1
|
|
|
2, 3, 5, 13, 23, 167, 311, 503, 1696463, 3616703, 119351231, 393749999, 388856692223, 35437499999999, 728640635326636031, 3885182313590882303, 19837740893195045044223, 5126863427472785697108393983, 140901732869280543971697196500573487103
(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, 5] - 1, {i, 2, 100}], PrimeQ[#]&]
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|