A037113 Trajectory of 3 under map n->31n+1 if n odd, n->n/2 if n even.

3, 94, 47, 1458, 729, 22600, 11300, 5650, 2825, 87576, 43788, 21894, 10947, 339358, 169679, 5260050, 2630025, 81530776, 40765388, 20382694, 10191347, 315931758, 157965879, 4896942250, 2448471125

Offset

0,1

Links

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

Mathematica

NestList[If[OddQ[#], 31#+1, #/2]&, 3, 30] (* Harvey P. Dale, Mar 07 2012 *)

Crossrefs

Sequence in context: A116292 A139543 A241982 * A142887 A297489 A241752

Adjacent sequences: A037110 A037111 A037112 * A037114 A037115 A037116

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved