|
| |
|
|
A063833
|
|
!n - 3 is prime.
|
|
1
|
|
|
|
1, 4, 5, 6, 13, 14, 20, 66, 91, 124, 212, 282, 460
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
COMMENTS
|
There are no further terms, because for n >= 467, 467 | !n - 3. - Serge Batalov, Jul 14 2017
|
|
|
LINKS
|
Table of n, a(n) for n=1..13.
|
|
|
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
Adjacent sequences: A063830 A063831 A063832 * A063834 A063835 A063836
|
|
|
KEYWORD
|
nonn,fini,full
|
|
|
AUTHOR
|
Robert G. Wilson v, Aug 21 2001
|
|
|
STATUS
|
approved
|
| |
|
|