OFFSET
0,3
COMMENTS
4 cannot be a member. Do all other positive integers occur?
MATHEMATICA
t = {}; s = 1; c = 0; Do[s = s*i; c += 1; If[PrimeQ[s + 1], AppendTo[t, c]; s = 1; c = 0], {i, 630}]; t (* Jayanta Basu, Jul 07 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Amarnath Murthy, Aug 12 2002
EXTENSIONS
More terms from Antonio G. Astudillo (afg_astudillo(AT)lycos.com), Apr 24 2003 and Dean Hickerson, Apr 27 2003
STATUS
approved