显示1-1个结果(共1个)。
第页1
按行读取的三角形:T(n,k)=将n的所有分区的所有部分之和转换为k个不同部分。
+0 2
1, 4, 6, 3, 12, 8, 10, 25, 24, 36, 6, 14, 77, 14, 32, 104, 40, 27, 153, 90, 40, 220, 150, 10, 22, 297, 275, 22, 72, 348, 444, 60, 26, 481, 676, 130, 56, 616, 938, 280, 60, 660, 1455, 450, 15, 80, 880, 1872, 832, 32, 34, 1003, 2618, 1309, 85, 108, 1224, 3312, 2106, 180, 38, 1349, 4465, 3078, 380, 120, 1620, 5540, 4540, 720
例子
三角形开始:
1;
4;
6, 3;
12, 8;
10, 25;
24, 36, 6;
14, 77, 14;
32, 104, 40;
27, 153, 90;
40, 220, 150, 10;
22, 297, 275, 22;
72, 348, 444, 60;
26, 481, 676, 130;
56, 616, 938, 280;
60, 660, 1455, 450, 15;
80, 880, 1872, 832, 32;
34, 1003, 2618, 1309, 85;
108, 1224, 3312, 2106, 180;
38, 1349, 4465, 3078, 380;
...
MAPLE公司
结束进程:
对于n,从1到20 do
结束do:
printf(“\n”);
#第二个Maple项目:
b: =proc(n,i)选项记忆;局部j;如果n=0,则为1
elif i<1,则else为0[];对于从0到n/i的j,请执行zip((x,y)
->x+y,%,[`如果`(j>0,0,[][]),b(n-i*j,i-1)],0)od;%[]fi
结束时间:
T: =n->底土(1=NULL,n*[b(n,n)])[]:
数学
nmax=30;T=Rest[CoefficientList[#,T]]&/@Rest[Cefficient List[-1+乘积[1+T x ^j/(1-x ^j),{j,1,nmax}]+O[x]^(nmax+1),x]];
搜索在0.003秒内完成
查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。
许可协议、使用条款、隐私政策。.
上次修改时间:美国东部夏令时2024年9月22日05:15。包含376097个序列。(在oeis4上运行。)
|