|
%I #8 May 25 2015 17:15:47
%S 2,6,8,18,11,24,26,54,16,33,35,72,38,78,80,162,23,48,49,99,52,105,107,
%T 216,56,114,116,234,119,240,242,486,34,69,71,144,73,147,148,297,77,
%U 156,157,315,160,321,323,648,83,168,170,342
%N Second of two trees generated by floor[(3n-1)/2].
%C See the comments at A183211, which is the mate for this tree.
%H Ivan Neretin, <a href="/A183212/b183212.txt">Table of n, a(n) for n = 1..8192</a>
%e First four levels of the tree:
%e .......................2
%e .......................6
%e .............8...................18
%e ...........11..24.............26....54
%t a = {2, 6}; row = {a[[-1]]}; Do[a = Join[a, row = Flatten[{Quotient[3 # - 1, 2], 3 #} & /@ row]], {n, 5}]; a (* _Ivan Neretin_, May 25 2015 *)
%Y Cf. A183211.
%K nonn,tabf
%O 1,1
%A _Clark Kimberling_, Dec 30 2010
|
