OFFSET
1,3
LINKS
Paolo Xausa, Table of n, a(n) for n = 1..10000
EXAMPLE
a(10) = 5 because the trajectory 19 -> 29 -> 15 -> 5 -> 3 -> 1 takes 5 steps.
MATHEMATICA
FarkasStep[x_] := Which[Divisible[x, 3], x/3, Mod[x, 4] == 3, (3*x + 1)/2, True, (x + 1)/2];
Array[Length[FixedPointList[FarkasStep, 2*# - 1]] - 2 &, 100]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Paolo Xausa, Sep 02 2024
STATUS
approved