A324839 Number of unlabeled rooted identity trees with n nodes where the branches of no branch of the root form a subset of the branches of the root.
1, 0, 1, 1, 2, 3, 8, 16, 35, 74, 166, 367, 831, 1878, 4299, 9857, 22775, 52777, 122957, 287337
Offset: 1
Examples
The a(1) = 1 through a(8) = 16 rooted identity trees: o ((o)) (((o))) ((o(o))) (((o(o)))) ((o)(o(o))) (((o))(o(o))) ((((o)))) ((o((o)))) ((o(o(o)))) (((o)(o(o)))) (((((o))))) ((((o(o))))) (((o(o(o))))) (((o)((o)))) ((o)((o(o)))) (((o((o))))) ((o)(o((o)))) ((o)(((o)))) ((o((o(o))))) ((o(((o))))) ((o(o)((o)))) ((((((o)))))) ((o(o((o))))) (((((o(o)))))) ((((o)((o))))) ((((o((o)))))) (((o)(((o))))) (((o(((o)))))) ((o)((((o))))) ((o((((o)))))) (((((((o)))))))
Crossrefs
Programs
-
Mathematica
idall[n_]:=If[n==1,{{}},Select[Union[Sort/@Join@@(Tuples[idall/@#]&/@IntegerPartitions[n-1])],UnsameQ@@#&]]; Table[Length[Select[idall[n],And@@Table[!SubsetQ[#,b],{b,#}]&]],{n,10}]
Comments