login
One of the basic cycles in the x->3x-1 (x odd) or x/2 (x even) problem.
1

%I #9 Oct 20 2023 22:37:42

%S 5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,

%T 14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,

%U 7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10,5,14,7,20,10

%N One of the basic cycles in the x->3x-1 (x odd) or x/2 (x even) problem.

%D R. K. Guy, Unsolved Problems in Number Theory, E16.

%t NestList[If[OddQ[#],3#-1,#/2]&,5,80] (* _Harvey P. Dale_, Feb 27 2023 *)

%K nonn,easy

%O 0,1

%A _N. J. A. Sloane_