|
| |
|
| 316651英镑 |
| 具有n片叶子跨越正整数初始区间的系列缩减根树的数量。 |
|
30
|
|
|
|
1, 2, 12, 112, 1444, 24086, 492284, 11910790, 332827136, 10546558146, 373661603588, 14636326974270, 628032444609396, 29296137817622902, 1476092246351259964, 79889766016415899270, 4622371378514020301740, 284719443038735430679268, 18601385258191195218790756
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,2
|
|
|
评论
|
如果每个非叶节点都至少有两个分支，则根树是连续减少的。
|
|
|
链接
|
|
|
|
配方奶粉
|
a（n）~c*d^n*n^（n-1），其中d=1.37392076830090205551979…和c=0.41435722857311602982846。。。
|
|
|
例子
|
a（3）=12棵树：
(1(11)), (111),
(1(12)), (2(11)), (112),
（1（22）），（2（12）），（122），
(1(23)), (2(13)), (3(12)), (123).
|
|
|
MAPLE公司
|
b： =proc（n，i，k）选项记忆`如果`（n=0，1，`如果`（i<1，0，
加法（二项式（A（i，k）+j-1，j）*b（n-i*j，i-1，k），j=0..n/i））
结束时间：
A： =（n，k）->`如果`（n<2，n*k，b（n，n-1，k））：
a： =n->加（加（a（n，k-j）*（-1）^j*二项式（k，j），j=0..k-1），k=1..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]]]；
gro[m_]：=如果[Length[m]==1，m，并集[Sort/@Join@@（Tuples[gro/@#]&/@Select[mps[m]，Length[#]>1&]）]]；
allnorm[n_Integer]：=函数[s，数组[Count[s，y_/；y<=#]+1&，n]]/@子集[Range[n-1]+1]；
表[Sum[Length[gro[m]]，{m，allnorm[n]}]，{n，5}]
（*第二个节目：*）
b[n_，i_，k_]：=b[n，i，k]=如果[n==0，1，如果[i<1，0，
求和[二项式[A[i，k]+j-1，j]b[n-i*j，i-1，k]，{j，0，n/i}]]；
A[n_，k_]：=如果[n<2，n*k，b[n，n-1，k]]；
a[n]：=总和[Sum[a[n，k-j]*（-1）^j*二项式[k，j]，{j，0，k-1}]，{k，1，n}]；
|
|
|
黄体脂酮素
|
EulerT（v）={Vec（exp（x*Ser（dirmul（v，vector（#v，n，1/n）））-1，-#v）}
R（n，k）={my（v=[k]）；对于（n=2，n，v=concat（v，EulerT（concat，[0]））；v}
seq（n）={和（k=1，n，R（n，k）*和（R=k，n，二项式（R，k）x（-1）^（R-k））}\\安德鲁·霍罗伊德2018年9月14日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
