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.

A180164 The sum of the two numbers in an amicable pair, A002025(n) + A002046(n).

This page as a plain text file.
%I A180164 #36 Feb 16 2025 08:33:12
%S A180164 504,2394,5544,10584,12600,21600,26880,35712,139104,133920,138240,
%T A180164 157248,168480,224640,262080,245520,294840,311040,348192,357120,
%U A180164 388800,399168,645624,698544,749952,756000,892800,955206,1017792,1048320
%N A180164 The sum of the two numbers in an amicable pair, A002025(n) + A002046(n).
%C A180164 This sequence initially shares many terms with A161005 because small amicable pairs are sometimes consecutive terms in the sorted list of amicable numbers, A063990.
%C A180164 This sequence is sorted by the smaller (abundant) member from A002025, so a(n) is not increasing. - _Jeppe Stig Nielsen_, Jan 27 2015
%C A180164 Duplicates occur, e.g., a(32)=a(35)=1296000. - _Jeppe Stig Nielsen_, Jan 27 2015
%C A180164 Comment originally by _M. F. Hasler_, Dec 14 2013, in A161005: "Also: The common value of sigma(a) = sigma(b) of the amicable pairs (a,b). See A137231 for the analog for amicable triples, and A116148 for quadruples." - _Jeppe Stig Nielsen_, Jan 27 2015
%C A180164 It is not known if a(n) is always even (see Hagis links). - _Jeppe Stig Nielsen_, Jan 31 2015
%C A180164 Are all terms abundant (A005101)? The first 10000 terms are. - _Ivan N. Ianakiev_, Apr 15 2021
%H A180164 Amiram Eldar, <a href="/A180164/b180164.txt">Table of n, a(n) for n = 1..10000</a> (terms 1..1000 from T. D. Noe)
%H A180164 Peter Hagis, <a href="http://dx.doi.org/10.1090/S0025-5718-1970-0276167-4">Lower bounds for relatively prime amicable numbers of opposite parity</a>, Math. Comp. 24 (1970), 963-968.
%H A180164 Peter Hagis, <a href="http://www.jstor.org/stable/2688105">Relatively Prime Amicable Numbers of Opposite Parity</a>, Mathematics Magazine, Vol. 43, No. 1 (Jan., 1970), pp. 14-20.
%H A180164 Eric W. Weisstein's World of Mathematics, <a href="https://mathworld.wolfram.com/PairSum.html">Pair Sum</a>.
%F A180164 a(n) = A259180(2n-1) + A259180(2n). - _Omar E. Pol_, Oct 22 2017
%e A180164 a(9) = A002025(9) + A002046(9) = 63020 + 76084 = 139104.
%t A180164 s[n_] := DivisorSigma[1,n]-n; smallAmicableQ[n_] := Module[{b=s[n]}, n<b && s[b]==n]; a=Select[Range[10^6], smallAmicableQ]; Table[n+s[n],{n,a}]
%Y A180164 Cf. A002025, A002046, A066539, A259180 (amicable pairs).
%K A180164 nonn
%O A180164 1,1
%A A180164 _T. D. Noe_, Aug 14 2010