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

3, 142, 71, 3338, 1669, 78444, 39222, 19611, 921718, 460859, 21660374, 10830187, 509018790, 254509395, 11961941566, 5980970783, 281105626802, 140552813401, 6605982229848, 3302991114924, 1651495557462

Offset

0,1

Links

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

Mathematica

NestList[If[EvenQ[#], #/2, 47#+1]&, 3, 30] (* Harvey P. Dale, May 05 2014 *)

Crossrefs

Sequence in context: A035331 A050819 A255190 * A279923 A195937 A162363

Adjacent sequences: A037118 A037119 A037120 * A037122 A037123 A037124

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved