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

%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_.