|
| |
|
| A326363型 |
| {1..n}子集的最大交叉反链数。 |
|
15
|
| |
|
|
|
抵消
|
0,2
|
|
|
评论
|
如果没有元素是任何其他元素的子集，则集合系统（集合集）是反链的，如果没有两个元素不相交，则是相交的。
|
|
|
链接
|
|
|
|
配方奶粉
|
|
|
|
例子
|
a（1）=1到a（4）=21最大交叉反链：
{} {} {} {}
{1} {1} {1} {1}
{2} {2} {2}
{12} {3} {3}
{123} {4}
{12}{13}{23} {1234}
{12}{13}{23}
{12}{14}{24}
{13}{14}{34}
｛23｝｛24｝｛34｝
{12}{134}{234}
{13}{124}{234}
{14} ｛123｝｛234｝
{23}{124}{134}
{24}{123}{134}
｛34｝｛123｝｛124｝
{12}{13}{14}{234}
{12}{23}{24}{134}
{13}{23}{34}{124}
{14}{24}{34}{123}
{123}{124}{134}{234}
|
|
|
数学
|
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]，{0，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，无穷大，全部]；
|
|
|
交叉参考
|
囊性纤维变性。A000372号,A003182号,A006126号,A006602号,A014466号,A051185号,A058891号,A261005型,A305000型,A305844型,A326358型,A326360型,A326361型.
|
|
|
关键字
|
非n,更多
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
