OFFSET
1,2
MATHEMATICA
Do[ If[ PrimeQ[ Sum[ k!, {k, 0, n - 1} ] + 2n - 1 ], Print[ n ] ], {n, 1, 883} ]
CROSSREFS
Cf. A063106.
KEYWORD
nonn
AUTHOR
Robert G. Wilson v, Aug 09 2001
STATUS
approved