cp's OEIS Frontend

A368180 Main diagonal of A368179: the n-th term in the trajectory of n under the A006368 map.

%I A368180 #10 Dec 21 2023 05:24:32
%S A368180 0,1,2,2,5,5,9,4,51,6,34,57,48,38,132,48,167,32,205,167,130,106,167,
%T A368180 243,50,159,125,369,297,119,702,130,844,84,500,50,1215,119,1424,142,
%U A368180 840,312,126,3041,70,7209,22143,540,1623,160,15165,1443,8867,3406,10509,1899,12146,578,911,79
%N A368180 Main diagonal of A368179: the n-th term in the trajectory of n under the A006368 map.
%H A368180 Paolo Xausa, <a href="/A368180/b368180.txt">Table of n, a(n) for n = 0..10000</a>
%H A368180 <a href="/index/3#3x1">Index entries for sequences related to 3x+1 (or Collatz) problem</a>
%F A368180 a(n) = A368179(n,n).
%t A368180 A368180[n_]:=Nest[If[OddQ[#],Floor[(3#+2)/4],3#/2]&,n,n];
%t A368180 Array[A368180,100,0]
%Y A368180 Cf. A006368, A368179.
%K A368180 nonn,easy
%O A368180 0,3
%A A368180 _Paolo Xausa_, Dec 15 2023