A318187 Number of totally transitive rooted trees with n leaves.
2, 2, 4, 8, 16, 32, 62, 122, 234, 451, 857, 1630, 3068, 5772, 10778, 20093, 37259
Offset: 1
Examples
The a(5) = 16 totally transitive rooted trees with 5 leaves: (o(o)(o(o)(o))) (o(o)(o)(o(o))) (o(o)(o)(o)(o)) (o(o)(oo(o))) (oo(o)(o(o))) (o(o)(o)(oo)) (oo(o)(o)(o)) (o(o)(ooo)) (o(oo)(oo)) (oo(o)(oo)) (ooo(o)(o)) (o(oooo)) (oo(ooo)) (ooo(oo)) (oooo(o)) (ooooo)
Crossrefs
Programs
-
Mathematica
totralv[n_]:=totralv[n]=If[n==1,{{},{{}}},Join@@Table[Select[Union[Sort/@Tuples[totralv/@c]],Complement[Union@@#,#]=={}&],{c,Select[IntegerPartitions[n],Length[#]>1&]}]]; Table[Length[totralv[n]],{n,8}]
Comments