

A002025


Smaller of an amicable pair: (a,b) such that sigma(a)=sigma(b)=a+b, a<b.
(Formerly M5414 N2352)


53



220, 1184, 2620, 5020, 6232, 10744, 12285, 17296, 63020, 66928, 67095, 69615, 79750, 100485, 122265, 122368, 141664, 142310, 171856, 176272, 185368, 196724, 280540, 308620, 319550, 356408, 437456, 469028, 503056, 522405, 600392, 609928
(list;
graph;
refs;
listen;
history;
text;
internal format)



OFFSET

1,1


COMMENTS

Sometimes called friendly numbers, but this usage is deprecated.
All terms are abundant (A005101).  Michel Marcus, Mar 10 2013
See A125490A125492 and A137231 for amicable triples, A036471A036474 and A116148 for amicable quadruples, and A233553 for amicable quintuples.  M. F. Hasler, Dec 14 2013
This sequence is strictly increasing (and A002046, which contains the larger (deficient) number in each pair, is sorted by this sequence).  Jeppe Stig Nielsen, Jan 27 2015
For the related amicable pairs see A259180.  Omar E. Pol, Jul 15 2015
Pomerance (1981) shows that there are at most x*exp(log(x)^(1/3)) members of this sequence up to x. In particular, as originally demonstrated by Erdős, this sequence has density 0.  Charles R Greathouse IV, Aug 17 2017


REFERENCES

Mariano Garcia, Jan Munch Pedersen and Herman te Riele, Amicable pairs  a survey, pp. 179196 in: Alf van der Poorten and Andres Stein (eds.), High Primes and Misdemeanours: Lectures in Honour of the 60th Birthday of Hugh Cowie Williams, Fields Institute Communications, AMS, Providence RI, 2004.
N. J. A. Sloane, A Handbook of Integer Sequences, Academic Press, 1973 (includes this sequence).
N. J. A. Sloane and Simon Plouffe, The Encyclopedia of Integer Sequences, Academic Press, 1995 (includes this sequence).


LINKS

T. D. Noe and Sergei Chernykh, Table of n, a(n) for n = 1..415523 [All terms up to 10^17. Terms 39375 through 415523 were computed by Sergei Chernykh]
J. Alanen, O. Ore and J. Stemple, Systematic computations on amicable numbers, Math. Comp., 21 (1967), 242245.
J. Bell, A translation of Leonhard Euler's..., arXiv:math/0409196 [math.HO], 20042009.
W. Borho and H. Hoffmann, Breeding Amicable Numbers in Abundance, Math. Comp., 46 (1986), 281293.
S. Chernykh, Amicable pairs list
Paul Erdős, On amicable numbers, Publ. Math. Debrecen 4 (1955), pp. 108111.
E. B. Escott, Amicable numbers, Scripta Mathematica, 12 (1946), 6172 [Annotated scanned copy]
L. Euler, De numeris amicabilibus, Opuscula varii argumetii, pages 23107, 1750. Reprinted in Opera mathematica: Series prima. Volumen II, Leonhardi Euleri commentationes arithmeticae. Sub ausp. soc. scient. nat. Helv., Teubner, Leipzig, Series I, Vol. 1915, pp. 86162.
M. Garcia, A Million New Amicable Pairs, J. Integer Seqs., Vol. 4 (2001), #01.2.6.
M. García, J. M. Pedersen, H. J. J. te Riele, Amicable pairs, a survey, Report MASR0307, Centrum Wiskunde & Informatica.
S. S. Gupta, Amicable Numbers
E. J. Lee, Amicable Numbers and the Bilinear Diophantine Equation, Math. Comp., 22 (1968), 181187.
Hisanori Mishima, First 236 amicable pairs
D. Moews, Perfect, amicable and sociable numbers
J. O. M. Pedersen, Known Amicable Pairs [Broken link]
J. O. M. Pedersen, Tables of Aliquot Cycles [Broken link]
J. O. M. Pedersen, Tables of Aliquot Cycles [Via Internet Archive WaybackMachine]
J. O. M. Pedersen, Tables of Aliquot Cycles [Cached copy, pdf file only]
Carl Pomerance, On the distribution of amicable numbers, J. reine angew. Math. 293/294 (1977), pp. 217222.
Carl Pomerance, On the distribution of amicable numbers, II, J. reine angew. Math. 325 (1981), pp. 183188.
H. J. J. te Riele, Four large amicable pairs, Math. Comp., 28 (1974), 309312.
H. J. J. te Riele, Computation of all the amicable pairs below 10^10, Math. Comp., 47 (1986), 361368 and Supplement pp. S9S40.
H. J. J. te Riele et al., Table of Amicable Pairs between 10^10 and 10^52, Note NMN8603, Department of Numerical Mathematics, Centre for Mathematics and Computer Science, Amsterdam, 1986, (warning: file size is 65MB).
T. Trotter, Jr., Amicable Numbers [Warning: As of March 2018 this site appears to have been hacked. Proceed with great caution. The original content should be retrieved from the Wayback machine and added here.  N. J. A. Sloane, Mar 29 2018]
Eric Weisstein's World of Mathematics, Amicable Pair.


FORMULA

a(n) = A259180(2n1) = A180164(n)  A259180(2n) = A180164(n)  A002046(n).  Omar E. Pol, Jul 15 2015


MATHEMATICA

Reap[For[n = 1, n <= 10^6, n++, If[(s = DivisorSigma[1, n]) > 2n && DivisorSigma[1, s  n] == s, Print[n]; Sow[n]]]][[2, 1]] (* JeanFrançois Alcover, Oct 09 2015, after M. F. Hasler *)


PROG

(PARI) aliquot(n)=sigma(n)n
isA002025(n)={local(a); a=aliquot(n); a>n && aliquot(a)==n} \\ Michael B. Porter, Apr 11 2010
(PARI) for(n=1, 1e6, (s=sigma(n))>2*n && sigma(sn)==s && print1(n", ")) \\ M. F. Hasler, Dec 14 2013
(PARI) forfactored(n=1, 10^6, t=sigma(n[2])n[1]; if(t>n[1] && sigma(t)==n[1]+t, print1(n[1]", "))) \\ Charles R Greathouse IV, Aug 17 2017


CROSSREFS

Cf. A002046, A063990, A066873, A180164, A259180.
Sequence in context: A257354 A102073 A234969 * A260086 A241615 A180219
Adjacent sequences: A002022 A002023 A002024 * A002026 A002027 A002028


KEYWORD

nonn,nice


AUTHOR

N. J. A. Sloane


EXTENSIONS

More terms from Larry Reeves (larryr(AT)acm.org), Oct 24 2000


STATUS

approved



