OFFSET
1,4
COMMENTS
k equals nextprime(n!*prime(n)) - n!*prime(n).
FORMULA
a(n) = A151800(n!*prime(n)) - n!*prime(n).
MATHEMATICA
spk[n_]:=Module[{c=n!Prime[n]}, NextPrime[c]-c]; Array[spk, 70] (* Harvey P. Dale, Aug 13 2021 *)
PROG
(PARI) a(n) = my(x=n!*prime(n)); nextprime(x+1) - x; \\ Michel Marcus, Feb 22 2020
CROSSREFS
KEYWORD
nonn
AUTHOR
Mohamed Sami Gattoufi, Feb 21 2020
STATUS
approved