|
|
A223606
|
|
Numbers n whose deficiency is 22: sigma(n) - 2*n = -22.
|
|
2
|
|
|
23, 35, 39, 63, 116, 296, 848, 9536, 35456, 2118656, 537214976, 2148171776, 137444458496
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
1,1
|
|
COMMENTS
|
a(14) > 10^12.
Any term x of this sequence can be combined with any term y of A223612 to satisfy the property (sigma(x)+sigma(y))/(x+y) = 2, which is a necessary (but not sufficient) condition for two numbers to be amicable. - Timothy L. Tiffin, Sep 13 2016
|
|
LINKS
|
|
|
EXAMPLE
|
n = 9536. sigma(n)-2*n = -22.
|
|
MATHEMATICA
|
Select[Range[1, 10^8], DivisorSigma[1, #] - 2 # == - 22 &] (* Vincenzo Librandi, Sep 14 2016 *)
|
|
PROG
|
(PARI) for(n=1, 10^8, if(sigma(n)-2*n==-22, print1(n ", ")))
(Magma) [n: n in [1..9*10^6] | (SumOfDivisors(n)-2*n) eq -22]; // Vincenzo Librandi, Sep 14 2016
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn,more
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|