OFFSET
1,2
COMMENTS
a(5) is greater than 10^7. - Matty Muir, Oct 01 2020
EXAMPLE
The 8th prime, 19, divides 2*3*5*7*11*13*17+1=510511, thus 7 is a member.
MATHEMATICA
With[{nn=500}, Flatten[Position[Thread[{Rest[FoldList[Times, 1, Prime[ Range[ nn]]]]+ 1, Prime[ Range[2, nn+1]]}], _?(Divisible[#[[1]], #[[2]]]&), {1}, Heads->False]]] (* Harvey P. Dale, Apr 18 2015 *)
PROG
(PARI) p=1; for(n=1, 10^5, p=p*prime(n); if((p+1)%prime(n+1)==0, print1(n", ")))
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Ralf Stephan, Mar 24 2003
STATUS
approved