[go: up one dir, main page]

login
A058541
Trajectory of 1 under map that sends x to 3x - sigma(x).
3
1, 2, 3, 5, 9, 14, 18, 15, 21, 31, 61, 121, 230, 258, 246, 234, 156, 76, 88, 84, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28, 28
OFFSET
0,2
MATHEMATICA
NestList[3#-DivisorSigma[1, #]&, 1, 70] (* Harvey P. Dale, Jul 23 2012 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved