OFFSET
0,1
MATHEMATICA
NestList[If[OddQ[#], 11#+1, #/2]&, 3, 40] (* Harvey P. Dale, Jun 01 2022 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
STATUS
approved