cp's OEIS Frontend

This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.

A223606 Numbers n whose deficiency is 22: sigma(n) - 2*n = -22.

This page as a plain text file.
%I A223606 #23 Sep 08 2022 08:46:04
%S A223606 23,35,39,63,116,296,848,9536,35456,2118656,537214976,2148171776,
%T A223606 137444458496
%N A223606 Numbers n whose deficiency is 22: sigma(n) - 2*n = -22.
%C A223606 Suggested by _N. J. A. Sloane_ and _Robert G. Wilson v_.
%C A223606 a(14) > 10^12.
%C A223606 a(14) > 10^13. - _Giovanni Resta_, Mar 29 2013
%C A223606 a(14) > 10^18. - _Hiroaki Yamanouchi_, Aug 21 2018
%C A223606 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
%e A223606 n = 9536. sigma(n)-2*n = -22.
%t A223606 Select[Range[1, 10^8], DivisorSigma[1, #] - 2 # == - 22 &] (* _Vincenzo Librandi_, Sep 14 2016 *)
%o A223606 (PARI) for(n=1, 10^8, if(sigma(n)-2*n==-22, print1(n ", ")))
%o A223606 (Magma) [n: n in [1..9*10^6] | (SumOfDivisors(n)-2*n) eq -22]; // _Vincenzo Librandi_, Sep 14 2016
%Y A223606 Cf. A000203, A033879, A223612 (abundance 22).
%K A223606 nonn,more
%O A223606 1,1
%A A223606 _Donovan Johnson_, Mar 23 2013