OFFSET
0,1
COMMENTS
a(n) = A161021(n-153) for n with 297 <= n <= 323;
a(n) = A161022(n-100) for n with 308 <= n <= 323.
At step 321 becomes periodic: 4 2 1 4 2 1 4 2 1 ... - N. J. A. Sloane, Jul 27 2019
LINKS
MATHEMATICA
NestWhileList[If[EvenQ[#], #/2, 3#+1]&, 35655, #>1&] (* Harvey P. Dale, Apr 28 2016 *)
CROSSREFS
KEYWORD
AUTHOR
Reinhard Zumkeller, Jun 03 2009
EXTENSIONS
Edited by N. J. A. Sloane, Jul 27 2019
STATUS
approved