OFFSET
1,1
COMMENTS
This sequence is finite and has A131450(10) = 4 terms. - Zhuorui He, Nov 09 2025
MATHEMATICA
Collatz[n_]:=NestWhileList[If[EvenQ[#], #/2, 3 #+1]&, n, #>1&]; t={}; Do[If[Length[Select[Collatz[n], EvenQ]] == 10, AppendTo[t, n]], {n, 1, 100000, 2}]; t
CROSSREFS
KEYWORD
nonn,fini,full,easy
AUTHOR
Vincenzo Librandi, Nov 12 2011
STATUS
approved
