OFFSET
1,2
COMMENTS
a(12) > 10^15. - Paul W. Dyson, Nov 19 2024
LINKS
MATHEMATICA
s = 0; Do[s = s + Prime[n]^6; If[ Mod[s, n] == 0, Print[n]], {n, 240000}]
PROG
(PARI) s=0; n=0; forprime(p=2, 4e9, s+=p^6; if(s%n++==0, print1(n", "))) \\ Charles R Greathouse IV, Mar 15 2011
CROSSREFS
KEYWORD
nonn,hard,more
AUTHOR
Alexander Adamchuk, Feb 03 2007
EXTENSIONS
a(4) from Stefan Steinerberger, May 10 2007
a(5)-a(6) from Charles R Greathouse IV, Mar 15 2011 to Mar 19 2011
a(7) from Paul W. Dyson, Jan 08 2021
a(8) from Bruce Garner, Jul 10 2021
a(9) from Paul W. Dyson, Oct 21 2022
a(10) from Paul W. Dyson, Oct 31 2022
a(11) from Paul W. Dyson, Dec 08 2022
STATUS
approved