A171103 Aliquot sequence starting at 46758.

46758, 46770, 65550, 113010, 158286, 191922, 205518, 205530, 375078, 443418, 449958, 497562, 574278, 574290, 972090, 1918278, 2574522, 3034458, 4479750, 8807706, 11409894, 13311582, 13311594, 16269846, 16509018, 16578438

Offset

0,1

Comments

As of today, 3488 terms of the sequence sequence are known, cf. link to the factodb web site. - M. F. Hasler, Feb 25 2018

Links

Amiram Eldar, Table of n, a(n) for n = 0..3617 (terms 0..447 from R. J. Mathar)

factordb.com, Aliquot sequence for 46758.

Index entries for sequences related to aliquot parts.

Mathematica

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

Prog

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

Crossrefs

Cf. A098007 (length of aliquot sequences); some other examples: A008885 (starting at 30) .. A008892 (starting at 276), A014360 (starting at 552) .. A014365 (starting at 1134), see link to index entries for a more complete list.

Sequence in context: A205752 A205474 A232411 * A066359 A234774 A236053

Adjacent sequences: A171100 A171101 A171102 * A171104 A171105 A171106

Keyword

nonn

Author

N. J. A. Sloane, Sep 25 2010, based on a posting by Hans Havermann to the Math Fun Mailing List, Sep 16, 2010

Extensions

Erroneous comment replaced by M. F. Hasler, Mar 01 2018

Status

approved