OFFSET
0,6
COMMENTS
Both the 3x+1 steps and the halving steps are counted. a(n)=0 only for n = 1, 2, 3, 4, 6, 8, and 10.
LINKS
T. D. Noe, Table of n, a(n) for n = 0..400
MATHEMATICA
nn = 10; t1 = {0, 0, 5, 21, 85, 341, 1365}; Do[AppendTo[t1, 4 t1[[-1]] + 1], {3*nn}]; t2 = {1, 0, 0, 0, 0, 0, 113}; Do[AppendTo[t2, 4 t2[[-1]] + 1]; AppendTo[t2, 4 t2[[-1]] + 1]; AppendTo[t2, 4 t2[[-1]] + 29], {nn}]; t = Riffle[t2, t1] (* T. D. Noe, Feb 14 2013 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
T. D. Noe, Apr 27 2010
STATUS
approved