A143759 Aliquot sequence starting at 86.

86, 46, 26, 16, 15, 9, 4, 3, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset

0,1

Links

Table of n, a(n) for n=0..102.

Formula

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

Mathematica

NestList[If[#>0, DivisorSigma[1, #]-#, 0]&, 86, 100] (* Paolo Xausa, Oct 16 2023 *)

Crossrefs

Cf. A001065.

Sequence in context: A214375 A045916 A033406 * A020665 A259084 A058907

Adjacent sequences: A143756 A143757 A143758 * A143760 A143761 A143762

Keyword

nonn,easy

Author

N. J. A. Sloane, Nov 30 2008

Status

approved