%I #9 May 19 2024 20:38:23
%S 3,136,68,34,17,766,383,17236,8618,4309,193906,96953,4362886,2181443,
%T 98164936,49082468,24541234,12270617,552177766,276088883,12423999736,
%U 6211999868,3105999934,1552999967
%N Trajectory of 3 under map n->45n+1 if n odd, n->n/2 if n even.
%H Harvey P. Dale, <a href="/A037120/b037120.txt">Table of n, a(n) for n = 0..1000</a>
%t NestList[If[EvenQ[#],#/2,45#+1]&,3,30] (* _Harvey P. Dale_, Jul 08 2019 *)
%K nonn
%O 0,1
%A _N. J. A. Sloane_.