[go: up one dir, main page]

login
A298654
Least number k such that the sum of the anti-divisors of k is equal to the sum of the anti-divisors of k+n.
0
8, 55, 26, 15, 43, 10, 89, 22, 20, 129, 118, 430, 43, 32, 39, 88, 174, 179, 35, 31, 45, 161, 53, 27, 228, 407, 122, 86, 90, 149, 87, 288, 46, 177, 283, 28, 117, 130, 222, 158, 200, 82, 68, 62, 383, 932, 32, 63, 120, 375, 1107, 67, 298, 110, 119, 352, 122, 277
OFFSET
1,1
EXAMPLE
a(1) = 8 because the sum of the anti-divisors of 8 is 8 and of 9 is 8 again;
a(2) = 55 because the sum of the anti-divisors of 55 is 74 and of 57 is 74 again.
MAPLE
with(numtheory): P:=proc(q) local a, b, i, j, k, n; for i from 0 to q do for n from 1 to q do
k:=0; j:=n; while j mod 2 <> 1 do k:=k+1; j:=j/2; od;
a:=sigma(2*n+1)+sigma(2*n-1)+sigma(n/2^k)*2^(k+1)-6*n-2;
k:=0; j:=n+i; while j mod 2 <> 1 do k:=k+1; j:=j/2; od;
b:=sigma(2*(n+i)+1)+sigma(2*(n+i)-1)+sigma((n+i)/2^k)*2^(k+1)-6*(n+i)-2;
if a=b then print(n); break; fi; od; od; end: P(10^5);
CROSSREFS
Sequence in context: A052690 A304589 A027525 * A080312 A116885 A179407
KEYWORD
nonn,easy
AUTHOR
Paolo P. Lava, Jan 24 2018
STATUS
approved