A058541 - OEIS

%I #9 Jul 16 2017 05:09:13

%S 1,2,3,5,9,14,18,15,21,31,61,121,230,258,246,234,156,76,88,84,28,28,

%T 28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,

%U 28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28,28

%N Trajectory of 1 under map that sends x to 3x - sigma(x).

%t NestList[3#-DivisorSigma[1,#]&,1,70] (* _Harvey P. Dale_, Jul 23 2012 *)

%Y Cf. A037159, A058542, A058545.

%K nonn

%O 0,2

%A _N. J. A. Sloane_, _Jud McCranie_, Dec 24 2000