OFFSET
0,1
COMMENTS
1stSubmergeLengths[=A074473] with initial values belonging to other residue classes modulo 64 are either listed in A075476-A075483 or can be easily determined. For 64k+2s the first sink below initial value is at 2nd iterate; for 64k+4s+1 the first submerge below initial value comes at 4th term of iteration list; finally if initial value is of 64k+4s+3 form or moreover initial value = 64k+r, r = 3, 11, 19, 23, 35, 43, 51, 55, then for all k first sink emerges at the 7th, 9th, 7th, 9th, 7th, 9th, 7th, 9th iterates, respectively.
FORMULA
a(n) = A074473(64n + 63).
EXAMPLE
n=8: 64n + 63 = 575, the list = the 17th term 410 < 575 = initial value, so a(8)=17.
MATHEMATICA
Table[Function[k, Length@ NestWhileList[If[EvenQ@ #, #/2, 3 # + 1] &, k, # >= k &]][64 n - 1], {n, 120}] (* Michael De Vlieger, Feb 20 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Sep 24 2002
STATUS
approved