|
|
A125827
|
|
Numbers m that divide 2^11 + 3^11 + 5^11 + ... + prime(m)^11.
|
|
2
|
|
|
1, 25, 59, 2599, 6195, 421407, 11651191, 19293221, 255136097, 1820015683, 2183556659, 7993872143, 9850779563, 2006892138335, 2649677145789, 6645858099781, 318039538085101
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
MATHEMATICA
|
s = 0; Do[s = s + Prime[n]^11; If[ Mod[s, n] == 0, Print[n]], {n, 7000}]
|
|
PROG
|
|
|
CROSSREFS
|
Cf. A085450 = smallest m > 1 such that m divides Sum_{k=1..m} prime(k)^n.
|
|
KEYWORD
|
hard,more,nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|