|
%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
|
