|
| |
|
| A330675型 |
| 原子构成大小为n的强正规多集的最大深度的平衡约化多系数。 |
|
10
|
| |
|
|
|
抵消
|
0,3
|
|
|
评论
|
平衡约化多系统或者是有限多集，或者是具有平衡约化多重系统的至少两个部分（并非所有部分都是单子）的多集划分。
一个有限多集是强正规的，如果它覆盖了一个具有弱递减重数的正整数的初始区间。
|
|
|
链接
|
|
|
|
例子
|
a（2）=2和a（3）=6多系统：
{1,1} {{1},{1,1}}
｛1，2｝｛1｝，｛1，2｝｝
{{1},{2,3}}
{{2},{1,1}}
{{2},{1,3}}
｛｛3｝，｛1，2｝｝
a（4）=43个多系统（省略逗号和外括号）：
{{1}}{{1}{11}} {{1}}{{1}{12}} {{1}}{{1}{22}} {{1}}{{1}{23}} {{1}}{{2}{34}}
{{11}}{{1}{1}} {{11}}{{1}{2}} {{11}}{{2}{2}} {{11}}{{2}{3}} {{12}}{{3}{4}}
{{1}}{{2}{11}} {{1}}{{2}{12}} {{1}}{{2}{13}} {{1}}{{3}{24}}
{{12}}{{1}{1}} {{12}}{{1}{2}} {{12}}{{1}{3}} {{13}}{{2}{4}}
{{2}}{{1}{11}} {{2}}{{1}{12}} {{1}}{{3}{12}} {{1}}{{4}{23}}
{{2}}{{2}{11}} {{13}}{{1}{2}} {{14}}{{2}{3}}
{{22}}{{1}{1}} {{2}}{{1}{13}} {{2}}{{1}{34}}
{{2}}{{3}{11}} {{2}}{{3}{14}}
{{23}}{{1}{1}} {{23}}{{1}{4}}
{{3}}{{1}{12}} {{2}}{{4}{13}}
｛｛3｝｝｛2｝｛11｝｝｛24｝｝｛1｝｛3｝｝
{{3}}{{1}{24}}
{{3}}{{2}{14}}
{{3}}{{4}{12}}
{{34}}{{1}{2}}
{{4}}{{1}{23}}
{{4}}{{2}{13}}
{{4}}{{3}{12}}
|
|
|
数学
|
strnorm[n_]：=扁平[MapIndexed[表[#2，{#1}]&，#]]&/@IntegerPartitions[n]；
sps[{}]：={{}}；sps[set:{i_，___}]：=联接@@函数[s，前缀[#，s]和/@sps[Complement[set，s]]/@Cases[子集[set]，{i，___}]；
mps[set_]：=联合[Sort[Sort/@（#/.x_Integer:>set[[x]]）]&/@sps[Range[Length[set]]]；
totm[m_]：=前缀[Join@@Table[totm[p]，{p，选择[mps[m]，1<长度[#]<长度[m]&]}]，m]；
表[Sum[Length[Select[totm[m]，Depth[#]==If[Length[m]<=1，2，Length[Pm]]&]]，{m，strnorm[n]}]，{n，0，5}]
|
|
|
交叉参考
|
囊性纤维变性。A000311号,A000669号,A001055号,A001678号,A005121号,A005804号,A316651型,A318812型,A330467型,A330474型,A330625型,A330628,A330664型,A330677型,A330679型.
|
|
|
关键词
|
非n,更多
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
