|
| |
|
| A255767型 |
| 按行读取的三角形：T（n，k）=将n的所有分区的所有部分之和转换为k个不同部分。 |
|
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,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;
26481、6763130；
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公司
|
地板（平方米（1+8*n）-1）/2）；
结束进程：
nDiffParts:=进程（L）
nops（转换（L，集合））；
结束进程：
局部a，L；
a:=0；
对于组合[分区]（n）do中的L
如果nDiffParts（L）=k，则
a:=a+1；
结束条件：；
结束do：
a；
结束进程：
结束进程：
对于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]]；
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
