|
| |
|
| A318566型 |
| 大小为n的多集的多集划分的非同构多集划分数。 |
|
23
|
|
|
|
1, 6, 21, 104, 452, 2335, 11992, 66810, 385101, 2336352, 14738380, 96831730, 659809115, 4657075074, 33974259046, 255781455848, 1984239830571, 15839628564349, 129951186405574, 1094486382191624, 9453318070371926, 83654146992936350, 757769011659766015, 7020652591448497490
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
链接
|
|
|
|
例子
|
a（3）=21多集分区的非同构代表：
{{{1,1,1}}}
{{{1,1,2}}}
{{{1,2,3}}}
{{{1},{1,1}}}
{{{1},{1,2}}}
{{{1},{2,3}}}
{{{2},{1,1}}}
{{{1},{1},{1}}}
{{{1},{1},{2}}}
{{{1},{2},{3}}}
{{{1}},{{1,1}}}
{{{1}},{{1,2}}}
{{{1}},{{2,3}}}
｛｛2｝｝，｛｛1，1｝｝｝
{{{1}},{{1},{1}}}
{{{1}},{{1},{2}}}
｛｛1｝｝、｛2｝、｛3｝｝
{{{2}},{{1},{1}}}
{{{1}},{{1}},{{1}}}
{{{1}},{{1}},{{2}}}
{{{1}},{{2}},{{3}}}
|
|
|
数学
|
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]]]；
strnorm[n_]：=扁平[MapIndexed[表[#2，{#1}]&，#]]&/@IntegerPartitions[n]；
dubnorm[m_]：=第一个[Union[Table[Map[Sort，m/.Rule@@@Table[{Union[Flatten[m]][[i]]，Union[Flatten[m]][perm[i]]]}，{i，Length[perm]}]，{0，2}]，}perm，Permutations[Union[Platten[m]]]}]]；
表[Length[Union[dubnorm/@Join@@mps/@Join@@mps/@strnorm[n]]，{n，5}]
|
|
|
程序
|
序列（n）={my（A=sExp（symGroupSeries（n）））\\安德鲁·霍罗伊德2020年12月30日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
