%I #9 Feb 09 2021 14:58:45

%S 1,2,1,3,4,2,1,4,2,1,5,14,7,8,4,2,1,6,3,4,2,1,7,8,4,2,1,8,4,2,1,9,26,

%T 13,22,11,28,14,7,8,4,2,1,10,5,14,7,8,4,2,1,11,28,14,7,8,4,2,1,12,6,3,

%U 4,2,1,13,22,11,28,14,7,8,4,2,1,14,7,8,4,2,1

%N Irregular triangle read by rows giving trajectory from n to reach 1 under the map A245471.

%C A340873 gives row lengths.

%C A341235 gives greatest terms.

%H Rémy Sigrist, <a href="/A341231/b341231.txt">Table of n, a(n) for n = 1..9098</a> (rows 1..500)

%F T(n, 1) = n.

%F T(n, A340873(n)) = 1.

%e Table begins:

%e 1;

%e 2, 1;

%e 3, 4, 2, 1;

%e 4, 2, 1;

%e 5, 14, 7, 8, 4, 2, 1;

%e 6, 3, 4, 2, 1;

%e 7, 8, 4, 2, 1;

%e 8, 4, 2, 1;

%e 9, 26, 13, 22, 11, 28, 14, 7, 8, 4, 2, 1;

%e 10, 5, 14, 7, 8, 4, 2, 1;

%e 11, 28, 14, 7, 8, 4, 2, 1;

%e 12, 6, 3, 4, 2, 1;

%e 13, 22, 11, 28, 14, 7, 8, 4, 2, 1;

%e 14, 7, 8, 4, 2, 1;

%e 15, 16, 8, 4, 2, 1;

%e 16, 8, 4, 2, 1;

%e ...

%o (PARI) row(n) = { my (r=[n]); while (n>1, r=concat(r, n=if (n%2, bitxor(n, 2*n+1), n/2))); r }

%Y Cf. A070165, A245471, A340873, A341235.

%K nonn,base,look,tabf

%O 1,2

%A _Rémy Sigrist_, Feb 07 2021