登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A327729型 a(n)=Sum_{p}M(n-k;p_1-1,…,p_k-1)*Product_{j=1..k}a(p_j),其中p=(p_1,…,p_k)将n的所有分区范围缩小为更小的部分(k是分区长度,M是多项式)。 3
1, 1, 2, 6, 18, 90, 414, 2892, 18342, 155124, 1265130, 13413240, 129656286, 1564538796, 18285385518, 255345207156, 3378398348214, 52931303772912, 797460543143154, 13926097774972152, 234050020177159926, 4466082284967035124, 83159771376289666806 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,3
评论
该公式是327643美元.
链接
阿洛伊斯·海因茨,n=1..460时的n,a(n)表
维基百科,多项式系数
维基百科,分区(数论)
MAPLE公司
使用(组合):
a: =proc(n)选项记忆`如果`(n<2,1,加上(mul(a(i),i=p)
*多项式(n-nops(p),映射(x->x-1,p)[]),
p=选择(x->nops(x)>1,分区(n)))
结束:
seq(a(n),n=1..24);
#第二个Maple项目:
b: =proc(n,p,i)选项记忆`如果`(n=0,p!,`if`(i<1,0,
b(n,p,i-1)+a(i)*b(n-i,p-1,min(n-i))/(i-1)!)
结束:
a: =n->`如果`(n<2,1,b(n$2,n-1)):
seq(a(n),n=1..24);
数学
b[n_,p_,i_]:=b[n,p,i]=如果[n==0,p!,如果[i<1,0,b[n、p、i-1]+a[i]b[n-i,p-1,Min[n-i、i]]/(i-1)!]];
a[n_]:=如果[n<2,1,b[n,n,n-1]];
数组[a,24](*Jean-François Alcover公司,2020年5月3日,第二届Maple项目之后*)
交叉参考
关键字
非n
作者
阿洛伊斯·海因茨2019年9月23日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:2024年4月24日13:49 EDT。包含371958个序列。(在oeis4上运行。)