|
|
例子
|
阵列ASPEC阵列的前几行：
2, 1, 1, 1, 1, 1, 1,
2, 3, 4, 5, 6, 7, 8,
2, 5, 9, 14, 20, 27, 35,
2, 7, 16, 30, 50, 77, 112,
2, 9, 25, 55, 105, 182, 294,
前几个T（n，n+1）=T（n、n）/2系数：
1/2, -1/6, 1/15, -4/105, 4/105, -16/231, 3056/15015, ...
SBD阵列的前几行：
1/2, 0, 0, 0
1/2, 0, 0, 0
1/2, -1/6, 0, 0
1/2, -1/6, 0, 0
1/2, -1/6, 1/15, 0
1/2, -1/6, 1/15, 0
1/2, -1/6, 1/15, -4/105
1/2, -1/6, 1/15, -4/105
BSPEC三角形的前几行：
B（0）=1=1/1
B（1）=1/2=1/2
B（2）=1/6=1/2-1/3
B（3）=0=1/2-1/2
B（4）=-1/30=1/2-2/3+2/15
B（5）=0=1/2-5/6+1/3
B（6）=1/42=1/2-1/1+3/5-8/105
B（7）=0=1/2-7/6+14/15-4/15
|
|
|
MAPLE公司
|
nmax:=13:mmax:=nmax:
A164555号：=进程（n）：如果n=1，则1其他数字（bernoulli（n））fi：结束：
A027642号：=过程（n）：如果n=1，则2 else denom（bernoulli（n））fi：结束：
对于n从1到nmax do，对于m从0到2*mmax do T（n，m）：=T（n-1，m+1）-T（n-1、m）od:od：
seq（T（n，n+1），n=0.nmax）：
对于n从0到nmax do ASPEC（n，0）：=2：对于m从1到mmax do ASPEE（n，m）：=（2*n+m）*二项式（n+m-1，m-1）/m od:od：
对于从0到nmax的n，do seq（ASPEC（n，m），m=0..max）od：
对于0到nmax的n，do对于0到2的m，*mmax do SBD（n，m）：=0 od:od：
对于从0到mmax的m，对于从2*m到nmax的n，do SBD（n，m）：=T（m，m+1）od:od：
对于从0到nmax的n，do seq（SBD（n，m），m=0..max/2）od：
对于从0到nmax的n，BSPEC（n，2）：=SBD（n，2中）*ASPEC（2，n-4）od：
对于m从0到mmax do，对于n从0到nmax do BSPEC（n，m）：=SBD（n，m）*ASPEC（m，n-2*m）od:od：
对于从0到nmax的n，do seq（BSPEC（n，m），m=0..max/2）od：
seq（添加（BSPEC（n，k），k=0..楼层（n/2）），n=0..nmax）：
Tx:=0：
对于0到nmax的n，对于0到地板（n/2）的m，执行a（Tx）：=denom（BSPEC（n，m））：Tx:=Tx+1：od:od：
|
