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

 


A322428型
n的所有成分中第k个最大部分的总和T(n,k);三角形T(n,k),n>=1,1<=k<=n,按行读取。
4
1, 3, 1, 8, 3, 1, 19, 8, 4, 1, 43, 20, 11, 5, 1, 94, 48, 27, 16, 6, 1, 202, 110, 64, 42, 22, 7, 1, 428, 245, 149, 100, 64, 29, 8, 1, 899, 533, 341, 228, 163, 93, 37, 9, 1, 1875, 1142, 765, 512, 383, 256, 130, 46, 10, 1, 3890, 2420, 1683, 1144, 859, 638, 386, 176, 56, 11, 1
抵消
1, 2
链接
阿洛伊斯·海因茨,行n=1..50,扁平
例子
3的4种成分为:111、12、21、3。k=1..3的第k个最大部分之和为:1+2+2+3=8,1+1+1+0=3,1+0+0=1。
三角形T(n,k)开始于:
1;
3, 1;
8, 3, 1;
19, 8, 4, 1;
43, 20, 11, 5, 1;
94, 48, 27, 16, 6, 1;
202, 110, 64, 42, 22, 7, 1;
428, 245, 149, 100, 64, 29, 8, 1;
899, 533, 341, 228, 163, 93, 37, 9, 1;
1875, 1142, 765, 512, 383, 256, 130, 46, 10, 1;
...
MAPLE公司
b: =proc(n,l)选项记住`如果`(n=0,加上(l[-i]*x^i,
i=1..nops(l)),加(b(n-j,排序([l[],j]),j=1..n))
结束时间:
T: =n->(p->seq(系数(p,x,i),i=1.degree(p)))(b(n,[])):
seq(T(n),n=1..12);
数学
b[n_,l]:=b[n,l]=如果[n==0,和[l[[-i]]x^i,{i,1,长度[l]}],和[b[n-j,排序[Append[l,j]]],{j,1,n}]];
T[n_]:=函数[p,表[系数[p,x,i],{i,1,指数[p,x]}][b[n,{}]];
阵列[T,12]//扁平(*Jean-François Alcover公司,2018年12月29日,之后阿洛伊斯·海因茨*)
交叉参考
列k=1给出A102712号.
行总和给出A001787号.
T(n+1,1+天花板(n/2))给出A027306号.
囊性纤维变性。A322427型.
关键词
非n,
作者
阿洛伊斯·海因茨2018年12月7日
状态
经核准的

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

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

上次修改时间:2024年9月23日11:58 EDT。包含376164个序列。(在oeis4上运行。)