OFFSET
1,2
COMMENTS
a(17) > 8*10^12. - Bruce Garner, Mar 29 2021
a(19) > 5*10^14. - Paul W. Dyson, Dec 31 2024
LINKS
MATHEMATICA
s = 0; Do[s = s + Prime[n]^11; If[ Mod[s, n] == 0, Print[n]], {n, 7000}]
PROG
(PARI) s=0; n=0; forprime(p=2, 4e9, s+=p^11; if(s%n++==0, print1(n", "))) \\ Charles R Greathouse IV, Mar 20 2011
CROSSREFS
Cf. A085450 = smallest m > 1 such that m divides Sum_{k=1..m} prime(k)^n.
KEYWORD
hard,more,nonn
AUTHOR
Alexander Adamchuk, Feb 03 2007
EXTENSIONS
3 more terms from Stefan Steinerberger, Jun 06 2007
1 more term from Sean A. Irvine, Jan 26 2011
a(10)-a(13) from Charles R Greathouse IV, Mar 20 2011
a(14) from Paul W. Dyson, Jan 08 2021
a(15) from Bruce Garner, Mar 08 2021
a(16) from Bruce Garner, Mar 29 2021
a(17) from Paul W. Dyson, Jan 03 2023
a(18) from Paul W. Dyson, Dec 20 2024
STATUS
approved