A058542 Trajectory of 16 under map that sends x to 3x - sigma(x).

16, 17, 33, 51, 81, 122, 180, -6, -30, -162, -849, -3683, -14889, -67387, -270481, -1083495, -5351733, -23785493, -95779647, -425687333, -1702749333, -7385743647, -33685755741, -156526119063, -703401325293, -3048080581927, -12307998348021, -53348118829343

Offset

0,1

Links

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

Mathematica

NestList[3#-DivisorSigma[1, #]&, 16, 30] (* Harvey P. Dale, Jun 01 2016 *)

Crossrefs

Cf. A037159, A058541, A058545.

Sequence in context: A041518 A042195 A041520 * A041516 A041514 A041512

Adjacent sequences: A058539 A058540 A058541 * A058543 A058544 A058545

Keyword

sign

Author

N. J. A. Sloane, Dec 24 2000

Status

approved