The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A280341 Number of distinct heights achieved in the Collatz (or '3x+1') problem when starting from numbers in the range [2^n,2^(n+1)). 4

%I

%S 1,2,4,6,10,16,26,41,53,64,74,85,101,118,128,144,157,174,195,217,238,

%T 261,281,309,324,342,364,397

%N Number of distinct heights achieved in the Collatz (or '3x+1') problem when starting from numbers in the range [2^n,2^(n+1)).

%C Here the height is defined to be the number of halving and tripling steps required to reach 1.

%C Interestingly the values in this sequence grow slowly (almost linearly) indicating that the average number of starting values with the same height increases with n.

%C Question: Is this sequence always increasing?

%C Definition corrected by _N. J. A. Sloane_, Apr 09 2020. The old definition was "Number of unique heights achieved in the Collatz (or '3x+1') problem when starting from numbers in the range [2^n,2^(n+1))."

%C This sequence a(n) as well as the sequence of maximum heights in each interval appear to increase quadratically with n. The odd numbers in [2^n, 2^(n+1)) , 5 <= n <= 20, create all distinct heights for the interval except for height n of number 2^n, and except for height n+3 when n is odd. - _Hartmut F. W. Hoft_, Dec 16 2020

%e The heights for starting values 16 to 31 are: 4, 12, 20, 20, 7, 7, 15, 15, 10, 23, 10, 111, 18, 18, 18, 106. The unique heights are: 4, 12, 20, 7, 15, 10, 23, 111, 18, 106. Hence a(4)=10.

%t collatz[n_] := If[EvenQ[n], n/2, 3n+1]

%t height[n_] := Length[NestWhileList[collatz, n, #!=1&]] - 1

%t a280341[n_] := Length[Union[Map[height, Range[2^n, 2^(n+1)-1]]]]

%t (* sequence data; long computation times for n >= 22 *)

%t Map[a280341, Range[0, 27]]

%t (* _Hartmut F. W. Hoft_, Dec 16 2020 *)

%Y Cf. A006577, A277109.

%K nonn

%O 0,2

%A _Dmitry Kamenetsky_, Jan 01 2017

%E a(25)-a(27) from _Hartmut F. W. Hoft_, Dec 16 2020

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified September 25 12:38 EDT 2021. Contains 347654 sequences. (Running on oeis4.)