|
| |
|
| A320395型 |
| {1，…，n}上非同构3-一致多集系统的个数。 |
|
8
|
|
|
|
1, 2, 10, 208, 45960, 287800704, 100103176111616, 3837878984050795692032, 32966965900633495618246298767360, 128880214965936601447070466061615999984402432, 464339910355487357558396669850788946402420533504952464572416
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
链接
|
|
|
|
例子
|
a（2）=10多集系统的非同构代表：
{}
｛｛111｝｝
{{122}}
{{111}{222}}
{{112}{122}}
{{112}{222}}
{{122}{222}}
{{111}{122}{222}}
{{112}{122}{222}}
{{111}{112}{122}{222}}
|
|
|
数学
|
表[Sum[2^PermutationCycles[Ordering[Map[Sort，Select[Tuples[Range[n]，3]，OrderedQ]/。规则@@@表[{i，prm[[i]]}，{i，n}]，{1}]]，长度]，{prm，排列[Range[n]]}]/n！，{n，6}]
|
|
|
黄体脂酮素
|
（PARI）
permcount（v）={my（m=1，s=0，k=0，t）；对于（i=1，#v，t=v[i]；k=if（i>1&&t==v[i-1]，k+1，1）；m*=t*k；s+=t）；s！/m}
rep（typ）=｛my（L=List（），k=0）；for（i=1，#typ，k+=typ[i]；listput（L，k）；while（#L<k，listput（L，#L））；Vec（L）｝
can（v，f）={my（d=1，u=v）；while（d>0，u=vecsort（apply（f，u））；d=lex（u，v））；！d}
Q（perm）={my（t=0）；对于子集（[#perm+2，3]，v，t+=can（[v[1]，v[2]-1，v[3]-2]，t->perm[t]）；t}
a（n）={my（s=0）；对于部分（p=n，s+=permcount（p）*2^Q（rep（p\\安德鲁·霍罗伊德2019年8月26日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
