A326946 Number of unlabeled T_0 set-systems on n vertices.
1, 2, 5, 34, 1919, 18660178
Offset: 0
Examples
Non-isomorphic representatives of the a(0) = 1 through a(2) = 5 set-systems: {} {} {} {{1}} {{1}} {{1},{2}} {{2},{1,2}} {{1},{2},{1,2}}
Crossrefs
Programs
-
Mathematica
dual[eds_]:=Table[First/@Position[eds,x],{x,Union@@eds}]; Table[Length[Union[normclut/@Select[Subsets[Subsets[Range[n],{1,n}]],UnsameQ@@dual[#]&]]],{n,0,3}]
Extensions
a(5) from Max Alekseyev, Oct 11 2023
Comments