A324770 Number of fully anti-transitive rooted identity trees with n nodes.
1, 1, 1, 1, 2, 3, 6, 13, 27, 58, 128, 286, 640, 1452, 3308, 7594, 17512, 40591, 94449, 220672
Offset: 1
Examples
The a(1) = 1 through a(7) = 6 fully anti-transitive 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))))))
Links
Crossrefs
Programs
-
Mathematica
idall[n_]:=If[n==1,{{}},Select[Union[Sort/@Join@@(Tuples[idall/@#]&/@IntegerPartitions[n-1])],UnsameQ@@#&]]; Table[Length[Select[idall[n],Intersection[Union@@Rest[FixedPointList[Union@@#&,#]],#]=={}&]],{n,10}]
Comments