A033962 Trajectory of 1 under map n->9n+1 if n odd, n->n/2 if n even

1, 10, 5, 46, 23, 208, 104, 52, 26, 13, 118, 59, 532, 266, 133, 1198, 599, 5392, 2696, 1348, 674, 337, 3034, 1517, 13654, 6827, 61444, 30722, 15361, 138250, 69125, 622126, 311063, 2799568, 1399784

Offset

0,2

Links

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

Mathematica

NestList[If[OddQ[#], 9#+1, #/2]&, 1, 40] (* Harvey P. Dale, Nov 30 2022 *)

Crossrefs

Sequence in context: A141321 A146266 A146218 * A241360 A096898 A146008

Adjacent sequences: A033959 A033960 A033961 * A033963 A033964 A033965

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved