OFFSET
1,2
COMMENTS
Does each prime number appear in this sequence at least once?
Answer to previous: Neither 2 nor 5 will appear, as no prime > 5 can end in a 5 or be even. - Bill McEachen, Dec 05 2020
LINKS
Michael De Vlieger, Table of n, a(n) for n = 1..10000
EXAMPLE
a(6) = primorial(3) - prime(6) = 30-13 = 17.
MATHEMATICA
Block[{a = {}, P = 2, j = 1}, Do[AppendTo[a, If[# > P, j++; P *= Prime[j], P] - #] &@ Prime[n], {n, 57}]; a] (* Michael De Vlieger, Dec 07 2020 *)
PROG
(PARI) a(n) = {my(pp=2, k=1, p=prime(n)); while (pp < p, k++; pp*=prime(k)); pp-p; } \\ Michel Marcus, Dec 06 2020
CROSSREFS
KEYWORD
easy,nonn
AUTHOR
Ctibor O. Zizka, Apr 07 2008
STATUS
approved