A177729
Positive integers which do not appear in a Collatz sequence starting from a smaller positive integer.
Original entry on oeis.org
1, 2, 3, 6, 7, 9, 12, 15, 18, 19, 21, 24, 25, 27, 30, 33, 36, 37, 39, 42, 43, 45, 48, 51, 54, 55, 57, 60, 63, 66, 69, 72, 73, 75, 78, 79, 81, 84, 87, 90, 93, 96, 97, 99, 102, 105, 108, 109, 111, 114, 115, 117, 120, 123, 126, 127, 129, 132, 133, 135, 138, 141
Offset: 1
Collatz 1: 1; Collatz 2: 2,1; Collatz 3: 3,10,5,16,8,4,2,1; Collatz 6: 6,3,10,...
-
a177729 = head . a192719_row -- Reinhard Zumkeller, Jan 03 2013
-
coll[n_]:=NestWhileList[If[EvenQ[#],#/2,3#+1]&,n,#>1&]; t={1}; Do[If[FreeQ[Union@@Table[coll[i],{i,n-1}],n],AppendTo[t,n]],{n,2,141}]; t (* Jayanta Basu, May 29 2013 *)
A192719
Chain of Collatz sequences.
Original entry on oeis.org
1, 2, 1, 3, 10, 5, 16, 8, 4, 2, 1, 6, 3, 10, 5, 16, 8, 4, 2, 1, 7, 22, 11, 34, 17, 52, 26, 13, 40, 20, 10, 5, 16, 8, 4, 2, 1, 9, 28, 14, 7, 22, 11, 34, 17, 52, 26, 13, 40, 20, 10, 5, 16, 8, 4, 2, 1, 12, 6, 3, 10, 5, 16, 8, 4, 2, 1
Offset: 1
The first Collatz sequence in the chain is (1). The second Collatz sequence in the chain is (2, 1), which starts with 2, since 2 is the smallest positive integer that doesn't appear the first Collatz sequence. The third Collatz sequence in the chain is (3, 10, 5, 16, 8, 4, 2, 1), which starts with 3, since 3 is the smallest positive integer that doesn't appear the previous Collatz sequences.
Thus this irregular array starts:
1;
2, 1;
3, 10, 5, 16, 8, 4, 2, 1;
6, 3, 10, 5, 16, 8, 4, 2, 1;
7, 22, 11, 34, 17, 52, 26, 13, 40, 20, 10, 5, 16, 8, 4, 2, 1;
9, 28, 14, 7, 22, 11, 34, 17, 52, 26, 13, 40, 20, 10, 5, 16, 8, 4, 2, 1;
...
-
a192719 n k = a192719_tabf !! (n-1) !! (k-1)
a192719_row n = a192719_tabf !! (n-1)
a192719_tabf = f [1..] where
f (x:xs) = (a070165_row x) : f (del xs $ a220237_row x)
del us [] = us
del us'@(u:us) vs'@(v:vs) | u > v = del us' vs
| u < v = u : del us vs'
| otherwise = del us vs
-- Reinhard Zumkeller, Jan 03 2013
-
See Lyons link.
Showing 1-2 of 2 results.
Comments