A033976 Trajectory of 1 under map n->41n+1 if n odd, n->n/2 if n even

1, 42, 21, 862, 431, 17672, 8836, 4418, 2209, 90570, 45285, 1856686, 928343, 38062064, 19031032, 9515516, 4757758, 2378879, 97534040, 48767020, 24383510, 12191755, 499861956, 249930978, 124965489

Offset

0,2

Links

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

Mathematica

NestList[If[EvenQ[#], #/2, 41#+1]&, 1, 30] (* Harvey P. Dale, Aug 19 2021 *)

Crossrefs

Sequence in context: A194710 A334148 A033362 * A236684 A053721 A195750

Adjacent sequences: A033973 A033974 A033975 * A033977 A033978 A033979

Keyword

nonn

Author

N. J. A. Sloane.

Status

approved