The OEIS mourns the passing of Jim Simons and is grateful to the Simons Foundation for its support of research in many branches of science, including the OEIS.
login
The OEIS is supported by the many generous donors to the OEIS Foundation.

 

Logo
Hints
(Greetings from The On-Line Encyclopedia of Integer Sequences!)
A216213 Numbers k such that sigma*(k) = Sum_{j=anti-divisors of k} sigma*(j), where sigma*(k) is the sum of the anti-divisors of k. 1
1, 2, 11, 12, 15, 16, 22, 31, 76, 152, 309, 1576, 375479, 781314, 1114986, 3734218, 24311881, 68133239, 147881549 (list; graph; refs; listen; history; text; internal format)
OFFSET
1,2
COMMENTS
Tested up to k = 108122.
a(20) > 3*10^8. - Donovan Johnson, Mar 22 2013
LINKS
EXAMPLE
Anti-divisors of 76 are 3, 8, 9, 17 and 51 and their sum is 88.
Anti-divisor of 3 is 2 -> Sum is 2.
Anti-divisors of 8 are 3 and 5 -> Sum is 8.
Anti-divisors of 9 are 2 and 6 -> Sum is 8.
Anti-divisors of 17 are 2, 3, 5, 7 and 11 -> Sum is 28.
Anti-divisors of 51 are 2, 6 and 34 -> Sum is 42.
Finally, 2+8+8+28+42=88.
MAPLE
A216213:= proc(q) local a, b, c, j, k, n;
for n from 1 to q do
a:={}; b:=0; for k from 2 to n-1 do if abs((n mod k)-k/2)<1 then b:=b+k; a:=a union {k}; fi; od;
c:=0; for j from 1 to nops(a) do for k from 2 to a[j]-1 do if abs((a[j] mod k)-k/2)<1 then c:=c+k; fi; od; od; if b=c then print(n); fi; od; end:
A216213(10^10);
CROSSREFS
Sequence in context: A059192 A087339 A345922 * A160948 A299973 A136971
KEYWORD
nonn
AUTHOR
Paolo P. Lava, Mar 13 2013
EXTENSIONS
a(13)-a(19) from Donovan Johnson, Mar 22 2013
STATUS
approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recents
The OEIS Community | Maintained by The OEIS Foundation Inc.

License Agreements, Terms of Use, Privacy Policy. .

Last modified May 30 02:46 EDT 2024. Contains 372957 sequences. (Running on oeis4.)