登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A326362型 {1..n}的非空非单个子集的最大交叉反链数。 12
1, 1, 1, 2, 16, 163, 11742, 12160640 (列表;图表;参考;;历史;文本;内部格式)
抵消
0,4
评论
如果没有任何部分是任何其他部分的子集,则集合系统(集合集)是反链的,如果没有两个部分不相交,则是相交的。
链接
配方奶粉
对于n>1,a(n)=A326363型(n) -n-1个=A007363号(n+1)-n。
例子
a(4)=16个最大交叉反链:
{{1,2,3,4}}
{{1,2},{1,3},{2,3}}
{{1,2},{1,4},{2,4}}
{{1,3},{1,4},{3,4}}
{{2,3},{2,4},{3,4}}
{{1,2},{1,3,4},{2,3,4}}
{{1,3},{1,2,4},{2,3,4}}
{{1,4},{1,2,3},{2,3,4}}
{{2,3},{1,2,4},{1,3,4}}
{{2,4},{1,2,3},{1,3,4}}
{{3,4}、{1,2,3}、{1,2,4}
{{1,2},{1,3},{1,4},{2,3,4}}
{{1,2},{2,3},{2,4},{1,3,4}}
{{1,3},{2,3},{3,4},{1,2,4}}
{{1,4},{2,4},{3,4},{1,2,3}}
{{1,2,3},{1,2,4},{1,3,4},{2,3,4}}
数学
stableSets[u_,Q_]:=如果[Length[u]==0,{{}},With[{w=First[u]},Join[stableSets[DeleteCases[u,w],Q],Prepend[#,w]&/@stableSets-[DeleteCases[u、r_/;r==w||Q[r,w]|Q[w,r]],Q]]];
fasmax[y_]:=补[y,并@@(大多数[子集[#]]&/@y)];
表[Length[fasmax[stableSets[Subsets[Range[n],{2,n}],Or[Intersection[#1,#2]=={},SubsetQ[#1、#2]]&]]],{n,0,5}]
(*第二个项目*)
n=2^6;g=CompleteGraph[n];i=0;
While[i<n,i++;j=i;While[j<n,j++;If[BitAnd[i,j]==0|| BitAnd[i,j]==i|| Bit And[i,j]==j,g=边删除[g,i<->j]]];
sets=FindClique[g,无穷大,全部];
长度[sets]-对数[2,n]-1(*以利亚·贝列戈夫斯基2020年5月6日*)
交叉参考
非空非单集的反链是A307249型.
最小覆盖反链为A046165号.
最大交叉反链为A007363号.
非空集的最大反链为A326359型.
关键词
非n,更多
作者
古斯·怀斯曼2019年7月1日
扩展
a(7)来自以利亚·贝列戈夫斯基2020年5月6日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年4月23日06:04。包含371906个序列。(在oeis4上运行。)