S000560


The numbers n in S000559.

1, 3, 7, 9, 19, 25, 27, 55, 73, 97, 129, 171, 231, 313, 327, 649, 703, 871, 1161, 2223, 2463, 2919, 3711, 6171, 10971, 13255, 17647, 23529, 26623, 34239, 35655, 52527, 77031, 106239, 142587, 156159, 216367, 230631, 410011, 511935, 626331, 837799, 1117065

1

S000560

comment

T. D. Noe, Plot of 64 terms

T. D. Noe, Table of 64 terms

Eric W. Weinstein, MathWorld: Collatz Problem

(Mma) nn = 11; Collatz[n_] := NestWhileList[If[EvenQ[#], #/2, (3*# + 1)/2] &, n, # > 1 &]; c = Table[Length[Collatz[n]], {n, 1, 2^(nn - 1), 2}]; t = {{1, 1}}; Do[If[c[[i]] > t[[-1, 2]], AppendTo[t, {2 i - 1, c[[i]]}]], {i, Length[c]}]; Transpose[t][[1]]

Cf. A006877, S000559, S000561.

nonn

T. D. Noe, Apr 06 2015

© Tony D Noe 2014-2015