login
A037110
Trajectory of 3 under map n->25n+1 if n odd, n->n/2 if n even.
1
3, 76, 38, 19, 476, 238, 119, 2976, 1488, 744, 372, 186, 93, 2326, 1163, 29076, 14538, 7269, 181726, 90863, 2271576, 1135788, 567894, 283947, 7098676, 3549338, 1774669, 44366726, 22183363, 554584076, 277292038
OFFSET
0,1
LINKS
MATHEMATICA
NestList[If[OddQ[#], 25#+1, #/2]&, 3, 30] (* Harvey P. Dale, Apr 09 2022 *)
CROSSREFS
Sequence in context: A238000 A308866 A089301 * A168385 A042267 A201428
KEYWORD
nonn
STATUS
approved