OFFSET
1,1
FORMULA
a(n) = primepi(A093078(n)). - Michel Marcus, Nov 06 2014
EXAMPLE
p(1)*p(2)*p(3)*p(4) - p(5) = 2*3*5*7 - 11 = 199. 199 is prime, therefore 4 is in the sequence.
MATHEMATICA
Select[Range[1000], PrimeQ[Times@@(Prime[Range[#]])-Prime[#+1]]&]
PROG
(PARI) lista(nn) = {prp = 1; for(n=1, nn, prp *= prime(n); if (isprime(prp-prime(n+1)), print1(n, ", ")); ); } \\ Michel Marcus, Nov 06 2014
CROSSREFS
KEYWORD
nonn,more
AUTHOR
Ivan N. Ianakiev, Nov 06 2014
EXTENSIONS
a(17)-a(18) using A093078 from Michael S. Branicky, Mar 18 2024
STATUS
approved