A329626 Smallest BII-number of an antichain with n edges.
0, 1, 3, 11, 139, 820, 2868, 35636, 199476, 723764
Offset: 0
Examples
The sequence of terms together with their corresponding set-systems begins: 0: {} 1: {{1}} 3: {{1},{2}} 11: {{1},{2},{3}} 139: {{1},{2},{3},{4}} 820: {{1,2},{1,3},{2,3},{1,4},{2,4}} 2868: {{1,2},{1,3},{2,3},{1,4},{2,4},{3,4}} 35636: {{1,2},{1,3},{2,3},{1,4},{2,4},{3,4},{5}} 199476: {{1,2},{1,3},{2,3},{1,4},{2,4},{3,4},{1,5},{2,5}} 723764: {{1,2},{1,3},{2,3},{1,4},{2,4},{3,4},{1,5},{2,5},{3,5}}
Crossrefs
Programs
-
Mathematica
bpe[n_]:=Join@@Position[Reverse[IntegerDigits[n,2]],1]; stableQ[u_]:=!Apply[Or,Outer[#1=!=#2&&SubsetQ[#1,#2]&,u,u,1],{0,1}]; First/@GatherBy[Select[Range[0,10000],stableQ[bpe/@bpe[#]]&],Length[bpe[#]]&]
Comments