OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A204459型 方阵A(n,k),n>=0,k>=0,由反对角线读取:A(n,k)是可以从元素和为k*(k*n+1)/2的{1,2,…,k*n}中选择的k元素子集的数量。 23
1, 0, 1, 0, 1, 1, 0, 1, 0, 1, 0, 1, 2, 1, 1, 0, 1, 0, 3, 0, 1, 0, 1, 8, 8, 4, 1, 1, 0, 1, 0, 33, 0, 5, 0, 1, 0, 1, 58, 141, 86, 25, 6, 1, 1, 0, 1, 0, 676, 0, 177, 0, 7, 0, 1, 0, 1, 526, 3370, 3486, 1394, 318, 50, 8, 1, 1, 0, 1, 0, 17575, 0, 11963, 0, 519, 0, 9, 0, 1 (列表;桌子;图表;参考;;历史;文本;内部格式)
抵消
0,13
评论
A(n,k)是将k*(k*n+1)/2划分为k个不同部分的数量<=k*n。
如果k>0且(n=0或k*(k*n+1)mod 2=1),则A(n,k)=0。
链接
阿洛伊斯·海因茨,反对角线d=0..60
例子
A(0,0)=1:{}。
A(1,1)=1:{1}。
A(5,1)=1:{3}。
A(1,5)=1:{1,2,3,4,5}。
A(2,2)=2:{1,4},{2,3}。
A(3,2)=3:{1,6},{2,5},}3,4}。
A(2,3)=0:{1,2,3,4,5,6}的子集没有元素和3*(3*2+1)/21/2。
A(4,2)=4:{1,8},{2,7},}3,6},[4,5}。
A(3,3)=8:{1,5,9},{1,6,8},}2,4,9},2,5,8},2,6,7},2,4,8},{3,5,7},{4,6}。
A(2,4)=8:{1,2,7,8},{1,3,6,8}。
方阵A(n,k)开始:
1, 0, 0, 0, 0, 0, 0, 0, ...
1, 1, 1, 1, 1, 1, 1, 1, ...
1, 0, 2, 0, 8, 0, 58, 0, ...
1, 1, 3, 8, 33, 141, 676, 3370, ...
1, 0, 4, 0, 86, 0, 3486, 0, ...
1, 1, 5, 25, 177, 1394, 11963, 108108, ...
1, 0, 6, 0, 318, 0, 32134, 0, ...
1, 1, 7, 50, 519, 5910, 73294, 957332, ...
MAPLE公司
b: =proc(n,i,t)选项记忆;
`如果`(i<t或n<t*(t+1)/2或n>t*(2*i-t+1)/2,0,
`如果`(n=0,1,b(n,i-1,t)+`如果`(n<i,0,b(n-i,i-1、t-1)))
结束时间:
A: =proc(n,k)局部s;s: =k*(k*n+1);
`if`(k=0,1,`if`(n=0或irem(s,2)=1,0,b(s/2,k*n,k))
结束时间:
seq(seq(A(n,d-n),n=0..d),d=0..15);
数学
b[n,i,t]/;i<t|n<t*((t+1)/2)|n>t*(2*i-t+1)/2)=0;b[0,_,_]=1;b[n_,i_,t_]:=b[n,i,t]=b[n,i-1,t]+如果[n<i,0,b[n-i,i-1、t-1]];a[_,0]=1;a[0,_]=0;a[n_,k_]:=与[{s=k*(k*n+1)},如果[Mod[s,2]==1,0,b[s/2,k*n,k]];扁平[表[a[n,d-n],{d,0,15},{n,0,d}]](*Jean-François Alcover公司,2012年6月15日,翻译自Maple,之后阿洛伊斯·海因茨*)
交叉参考
主对角线给出:A052456号.
关键词
非n,
作者
阿洛伊斯·海因茨2012年1月15日
状态
经核准的

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

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

上次修改时间:2024年6月8日04:51 EDT。包含373207个序列。(在oeis4上运行。)