login
A368180
Main diagonal of A368179: the n-th term in the trajectory of n under the A006368 map.
3
0, 1, 2, 2, 5, 5, 9, 4, 51, 6, 34, 57, 48, 38, 132, 48, 167, 32, 205, 167, 130, 106, 167, 243, 50, 159, 125, 369, 297, 119, 702, 130, 844, 84, 500, 50, 1215, 119, 1424, 142, 840, 312, 126, 3041, 70, 7209, 22143, 540, 1623, 160, 15165, 1443, 8867, 3406, 10509, 1899, 12146, 578, 911, 79
OFFSET
0,3
FORMULA
a(n) = A368179(n,n).
MATHEMATICA
A368180[n_]:=Nest[If[OddQ[#], Floor[(3#+2)/4], 3#/2]&, n, n];
Array[A368180, 100, 0]
CROSSREFS
Sequence in context: A325535 A345165 A062405 * A071181 A213675 A321185
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Dec 15 2023
STATUS
approved