|
| |
|
|
A220140
|
|
Length of the Collatz iteration (3x+1) starting at A220139(n).
|
|
3
|
|
|
|
1, 2, 8, 13, 12, 99, 154, 153, 77, 98, 97, 264, 210, 235, 234, 114, 113, 218, 159, 158, 157, 350, 393, 392, 329, 328, 327, 311, 310, 309, 308, 307, 270, 455, 454, 435, 434, 632, 607, 606, 605, 604, 603, 602, 591, 573, 572, 644, 643, 779, 723, 717, 716, 813
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
1,2
|
|
|
LINKS
|
T. D. Noe, Table of n, a(n) for n = 1..10000
|
|
|
MATHEMATICA
|
Collatz[n_] := NestWhileList[If[EvenQ[#], #/2, 3 # + 1] &, n, # > 1 &]; c = {1}; t = {}; Do[AppendTo[t, Length[c]]; c = Collatz[Max[c] + 1], {100}]; t
|
|
|
CROSSREFS
|
Sequence in context: A120000 A067678 A134905 * A344152 A030389 A136738
Adjacent sequences: A220137 A220138 A220139 * A220141 A220142 A220143
|
|
|
KEYWORD
|
nonn
|
|
|
AUTHOR
|
T. D. Noe, Jan 02 2013
|
|
|
STATUS
|
approved
|
| |
|
|
