OFFSET
1,2
COMMENTS
a(52) > 3*10^13. - Bruce Garner, Jun 05 2021
a(53) > 1.2*10^14. - Bruce Garner, Mar 28 2022
LINKS
Bruce Garner, Table of n, a(n) for n = 1..52
MATHEMATICA
p = 2; k = 0; s = 1; lst = {}; While[k < 521330000, s = s + p^5; If[Mod[s, ++k] == 0, AppendTo[lst, k]; Print[{k, p}]]; p = NextPrime@ p]
CROSSREFS
Cf. A085450 (smallest m > 1 such that m divides Sum_{k=1..m} prime(k)^n).
KEYWORD
hard,nonn
AUTHOR
Alexander Adamchuk, Feb 22 2007, Feb 23 2007
EXTENSIONS
a(31) from Sean A. Irvine, Jan 19 2011
a(32)-a(33) from Robert G. Wilson v, Jan 20 2011
a(34)-a(41) from Robert Price, Dec 18 2013
STATUS
approved