|
|
例子
|
方阵A（n，k）开始：
1, 1, 1, 1, 1, 1, 1, ...
0, 1, 1, 1, 1, 1, 1, ...
0, 3, 4, 3, 4, 3, 4, ...
0, 16, 25, 18, 25, 16, 27, ...
0, 125, 218, 157, 224, 125, 250, ...
0, 1296, 2451, 1776, 2601, 1320, 2951, ...
0, 16807, 33832, 24687, 37072, 17671, 42552, ...
|
|
|
MAPLE公司
|
带有（数字理论）：
egf:=k->exp（加（（-LambertW（-x））^d/d，d=除数（k））：
A： =（n，k）->n*系数（级数（egf（k），x，n+1），x、n）：
seq（seq（A（n，d-n），n=0..d），d=0..12）；
#第二个Maple项目：
使用（组合）：
b： =proc（n，i，k）选项记忆`如果`（n=0，1，`如果`（i<1，0，
加法（多项式（n，n-i*j，i$j）/j*b（n-i*j，i-1，k）*
（i-1）^j、 j=0..`如果`（irem（k，i）=0，n/i，0））
结束：
A： =（n，k）->加（b（j，min（k，j），k）*n^（n-j）*二项式（n-1，j-1），j=0..n）：
seq（seq（A（n，d-n），n=0..d），d=0..12）；
|
