|
|
A074207
|
|
Numbers n such that the sum of the first n primes divides n!.
|
|
0
|
|
|
11, 17, 23, 37, 40, 49, 50, 52, 53, 56, 77, 79, 80, 84, 87, 88, 91, 98, 103, 111, 112, 113, 115, 119, 121, 127, 128, 131, 139, 149, 151, 153, 157, 163, 172, 173, 179, 188, 213, 217, 230, 231, 237, 240, 245, 247, 253, 269, 270, 271, 275, 283, 285, 295, 297, 299
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
LINKS
|
|
|
EXAMPLE
|
11! / Sum_{i=1,...,11} Prime[i] = 249480, so 11 is a term of the sequence.
|
|
MATHEMATICA
|
s = 0; p = 1; r = {}; For[i = 1, i <= 500, i++, q = Prime[i]; s = s + q; p = p * i; If[Mod[p, s] == 0, r = Append[r, i]]]; r
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|