OFFSET
1,2
COMMENTS
Tested up to k = 10^6.
EXAMPLE
The sum of the anti-divisors of the numbers from 1 to 8 is 0 + 0 + 2 + 3 + 5 + 4 + 10 + 8 = 32 and 32/8 = 4.
MAPLE
with(numtheory); P:=proc(q) local a, b, j, k, n; b:=0;
for n from 1 to q do a:=0;
for k from 2 to n-1 do if abs((n mod k)-k/2)<1 then a:=a+k; fi; od;
b:=b+a; if b mod n=0 then print(n); fi; od; end: P(10^6);
CROSSREFS
KEYWORD
nonn
AUTHOR
Paolo P. Lava, Oct 02 2013
EXTENSIONS
a(29)-a(38) from Donovan Johnson, Oct 12 2013
STATUS
approved