A346783 a(n) = A006577(A346782(n)), records in A070974.

1, 8, 10, 20, 41, 44, 86, 147, 210, 264, 426, 500, 559, 633, 795, 950, 1069, 1171, 1218, 1327, 1330, 1342, 1402, 1551, 1672, 1974, 2274, 2528, 2725, 2730, 2911, 2928, 2994, 3117, 3315, 3443, 3495, 3524, 4061, 4347, 4651, 4703, 4818, 5049, 5322, 5447, 5449, 5756

Offset

1,2

Links

Table of n, a(n) for n=1..48.

Prog

(PARI) a6577(n0)={my(n=n0, k=0); while(n>1, k++; n=if(n%2, 3*n+1, n/2)); k};
a346783(limit)={my(msteps=0); for(k=0, limit, my(m=a6577(k!)); if(m>msteps, print1(m, ", "); msteps=m))};
a346783(150)

Crossrefs

Cf. A006577, A070974, A346782.

Sequence in context: A281067 A070974 A300022 * A073619 A338820 A302429

Adjacent sequences: A346780 A346781 A346782 * A346784 A346785 A346786

Keyword

nonn

Author

Hugo Pfoertner, Aug 04 2021

Status

approved