登录
A194548号
按行读取的三角形:T(n,k)=n的第k个分区中不包含1的部分,分区按字典顺序排列的部分数。
9
0, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 3, 2, 2, 1, 4, 3, 3, 2, 2, 2, 1, 4, 3, 3, 2, 3, 2, 2, 1, 5, 4, 4, 3, 3, 3, 2, 3, 2, 2, 2, 1, 5, 4, 4, 3, 4, 3, 3, 2, 3, 3, 2, 2, 2, 1, 6, 5, 5, 4, 4, 4, 3, 4, 3, 3, 3, 2, 4, 3, 3, 2, 3, 2, 2, 2, 1, 6, 5, 5, 4, 5, 4, 4, 3, 4, 4, 3, 3, 3, 2, 4, 3, 3, 3, 2, 3, 2, 2, 2, 1
抵消
1,4
链接
阿洛伊斯·海因茨,行n=1..33,扁平
蒂尔曼·皮耶斯克,对于A194602型,显示非一加数。
例子
写为三角形:
0;
1;
1;
2,1;
2,1;
3,2,2,1;
3,2,2,1;
4,3,3,2,2,2,1;
4,3,3,2,3,2,2,1;
5,4,4,3,3,3,2,3,2,2,2,1;
5,4,4,3,4,3,3,2,3,3,2,2,2,1;
6,5,5,4,4,4,3,4,3,3,3,2,4,3,3,2,3,2,2,2,1;
6,5,5,4,5,4,4,3,4,4,3,3,3,2,4,3,3,3,2,3,2,2,2,1;
MAPLE公司
T: =proc(n)局部b,l;
b: =程序(n,i,t)
如果n=0,则l:=l,t
那么elif i>n
否则b(n-i,i,t+1);b(n,i+1,t)
fi(菲涅耳)
结束;
如果n<2,则0,否则l:=NULL;b(n,2,0);l fi(低频)
结束时间:
seq(T(n),n=1..15); #阿洛伊斯·海因茨2011年12月19日
数学
T[n_]:=模块[{b,l},b[n0_,i_,T_]:=
如果[n0==0,l=Append[l,t],
如果[i>n0,b[n0-i,i,t+1];b[n0,i+1,t]]];
如果[n<2,{0},l={};b[n,2,0];【l】】;
表[T[n],{n,1,15}]//扁平(*Jean-François Alcover公司2021年3月5日之后阿洛伊斯·海因茨*)
交叉参考
关键词
非n,选项卡
作者
奥马尔·波尔2011年12月11日
扩展
更多术语来自阿洛伊斯·海因茨2011年12月19日
状态
经核准的