A014360 Aliquot sequence starting at 552.

552, 888, 1392, 2328, 3552, 6024, 9096, 13704, 20616, 30984, 46536, 86904, 165816, 367704, 628356, 837836, 628384, 630356, 491884, 368920, 499400, 772840, 978650, 975652, 744248, 696712, 628628, 857836, 857892, 1472268

Offset: 0

Author

Paul Zimmermann

Keywords

• nonn

References

• R. K. Guy, Unsolved Problems in Number Theory, B6.

Links

• Tyler Busby, Table of n, a(n) for n = 0..1181 (terms 0..352 from T. D. Noe)
• Christophe Clavier, Aliquot Sequences
• Paul Zimmermann, Latest information
• Index entries for sequences related to aliquot parts.

Crossrefs

Cf. A001065, A098007 (length of aliquot sequences).

Some other examples: A008885 (starting at 30) .. A008892 (starting at 276), A014361 (starting at 564) .. A014365 (starting at 1134), see link to index for a more complete list.

Programs

Mathematica

FixedPointList[If[# > 0, DivisorSigma[1, #] - #, 0]&, 552, 100] (* Jean-François Alcover, Mar 28 2020 *)

PARI

a(n, a=552)={for(i=1, n, a=sigma(a)-a); a} \\ M. F. Hasler, Feb 24 2018

Formula

a(n+1) = A001065(a(n)). - R. J. Mathar, Oct 11 2017