|
|
A256893型 |
| 指数Riordan数组[1,1/(2-e^x)-1]。 |
|
68
|
|
|
1, 0, 1, 0, 3, 1, 0, 13, 9, 1, 0, 75, 79, 18, 1, 0, 541, 765, 265, 30, 1, 0, 4683, 8311, 3870, 665, 45, 1, 0, 47293, 100989, 59101, 13650, 1400, 63, 1, 0, 545835, 1362439, 960498, 278901, 38430, 2618, 84, 1, 0, 7087261, 20246445, 16700545, 5844510, 1012431, 92610, 4494, 108, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,5
|
|
评论
|
这也是Stirling集数和无符号Lah数的矩阵乘积。
|
|
链接
|
|
|
公式
|
T(n,k)=n/k!*[x^n](1/(2-exp(x))-1)^k-阿洛伊斯·海因茨2015年4月17日
|
|
例子
|
数字三角形开始:
1;
0,1;
0, 3, 1;
0, 13, 9, 1;
0, 75, 79, 18, 1;
0, 541, 765, 265, 30, 1;
...
|
|
MAPLE公司
|
T: =(n,k)->n*系数(级数((1/(2-exp(x))-1)^k/k!,x、 n+1),x,n):
seq(seq(T(n,k),k=0..n),n=0..10)#阿洛伊斯·海因茨2015年4月17日
BellMatrix(n->多对数(n-1,1/2)/2,9)#彼得·卢什尼2016年1月29日
|
|
数学
|
T[n_,k_]:=n*级数系数[(1/(2-经验[x])-1)^k/k!,{x,0,n}];
(*BellMatrix函数定义于1964年. *)
RiordanArray[d_,h,n]:=RiordanArray[d,h,n,False];
RiordanArray[d_Function | d_Symbol,h_Function | h_Symbol,n_,exp_:(True | False)]:=模块[{M,td,th,k,M},
M[_,_]=0;
td=PadRight[系数列表[d[x]+O[x]^n,x],n];
th=PadRight[系数列表[h[x]+O[x]^n,x],n];
对于[k=0,k<=n-1,k++,M[k,0]=td[[k+1]]];
对于[k=1,k<=n-1,k++,
对于[m=k,m<=n-1,m++,
M[M,k]=总和[M[j,k-1]*th[[M-j+1]],{j,k-1,M-1}]];
如果[exp,
u=1;
对于[k=1,k<=n-1,k++,
u*=k;
对于[m=0,m<=k,m++,
j=如果[m==0,u,j/m];
M[k,M]*=j]]];
表[M[M,k],{M,0,n-1},{k,0,M}]];
|
|
黄体脂酮素
|
(鼠尾草)
定义数组(d,h,n,exp=false):
定义泰勒列表(f,n):
t=SR(f).taylor(x,0,n-1).list()
返回t+[0]*(n-len(t))
td=泰勒列表(d,n)
th=泰勒列表(h,n)
M=矩阵(QQ,n,n)
对于k in(0..n-1):M[k,0]=td[k]
对于k in(1..n-1):
对于m in(k.n-1):
M[M,k]=加法(M[j,k-1]*th[M-j]对于(k-1.M-1)中的j)
如果出口:
u=1
对于k in(1..n-1):
u*=k
对于m in(0..k):
如果m==0,则j=u,否则j/m
M[k,M]*=j
返回M
优先数组(1,1/(2-exp(x))-1,8,exp=真)
#作为矩阵产品:
定义Lah(n,k):
如果n==k:返回1
如果k<0或k>n:返回0
返回(k*n*伽马(n)^2)/(伽马(k+1)^2*伽玛(n-k+1))
矩阵(ZZ,8,stirling_number2)*矩阵(ZZ8,Lah)
|
|
交叉参考
|
|
|
关键字
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|