|
|
A063901
|
|
Numbers k such that Sum_{j=1..k} A001065(j) is divisible by k.
|
|
0
|
|
|
1, 6, 11, 17, 22, 36, 63, 94, 259, 632, 2161, 4441, 6268, 8305, 332790, 601702, 3864076, 3962954, 4393603, 11679862, 21878360, 57402883, 101658334, 121475393, 124070072, 432432118, 2068420025, 5287649972, 13320495021, 23871729838, 95486769082, 138630178659
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,2
|
|
LINKS
|
|
|
PROG
|
(PARI) s(n)=sigma(n)-n; for(n=1, 10^8, x=sum(k=1, n, s(k)); if(Mod(x, n)==0, print(n)))
(PARI) x = 0; for(n=1, 10^10, x = x + sigma(n)-n; if(x%n == 0, print1(n, ", "))) \\ Ryan Propper, Jan 13 2008
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
EXTENSIONS
|
|
|
STATUS
|
approved
|
|
|
|