Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A063833
!n - 3 is prime.
1
1, 4, 5, 6, 13, 14, 20, 66, 91, 124, 212, 282, 460
OFFSET
1,2
COMMENTS
There are no further terms, because for n >= 467, 467 | !n - 3. - Serge Batalov, Jul 14 2017
MATHEMATICA
Do[ If[ PrimeQ[ Sum[ k!, {k, 0, n - 1} ] - 3 ], Print[ n ] ], {n, 1, 800} ]
Position[Accumulate[Range[0, 500]!], _?(PrimeQ[#-3]&)]//Flatten (* Harvey P. Dale, Sep 20 2019 *)
CROSSREFS
Cf. A063508.
Sequence in context: A280382 A055033 A089119 * A260107 A167434 A139061
KEYWORD
nonn,fini,full
AUTHOR
Robert G. Wilson v, Aug 21 2001
STATUS
approved