A037117 Trajectory of 3 under map n->39n+1 if n odd, n->n/2 if n even

3, 118, 59, 2302, 1151, 44890, 22445, 875356, 437678, 218839, 8534722, 4267361, 166427080, 83213540, 41606770, 20803385, 811332016, 405666008, 202833004, 101416502, 50708251, 1977621790, 988810895

Offset

0,1

Links

Harvey P. Dale, Table of n, a(n) for n = 0..1000

Mathematica

NestList[If[EvenQ[#], #/2, 39#+1]&, 3, 40] (* Harvey P. Dale, Dec 27 2020 *)

Crossrefs

Sequence in context: A009095 A326995 A155209 * A283883 A173053 A180393

Adjacent sequences: A037114 A037115 A037116 * A037118 A037119 A037120

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved