%I#10 2021年6月8日14:58:01
%S 1,-1,1,-1,-2,1,-3,-1,-3,1,-13,-3,
%电话-13,-3,-1,-6,1,-3447,-461,-71,-13,-3,-1,-7,1,-29093,-3477,-461,-71,
%U-13,-3,-1,-8,1,-273343,-29093,-3447,-461,-71,-13,-3,1,-1,-9,1,2829325,-27334,-29093,-3447、-461,-13,-3,-1,1,-10,1
%N三角形的逆矩阵A104980。
%C逆矩阵A104980满足:当p>=0时,SHIFT_LEFT(A104980^p的第0列)=p*(A104990的第p+1列)。
%H G.C.Greubel,<a href=“/A104984/b104984.txt”>三角形的n=0..50行,展平</a>
%对于n>=0,F T(n,n)=1,T(n+1,n)=-(n+1);否则,对于n>k+1和k>=0,T(n,k)=T(n-k,0)=-A003319(n-k-1)。
%F和{k=0..n}T(n,k)=A104985(n).-_G.C.Greubel,2021年6月7日
%e三角形开始:
%e 1;
%e-1,1;
%e-1,-2,1;
%电子-3,-1,-3,1;
%电子-13,-3,-1,-4,1;
%e-71、-13、-3、-1、-5、1;
%电子-461、-71、-13、-3、-1、-6、1;
%电子-3447、-461、-71、-13、-3、-1、-7、1;
%电子-29093、-3447、-461、-71、-13、-3、-1、-8、1。。。
%t A003319[n_]:=A003319[n]=如果[n==0,0,n!-总和[j!*A003318[n-j],{j,n-1}]];
%t t[n_,k_]:=如果[k==n,1,如果[k==n-1,-n,-A003319[n-k]];
%t表[t[n,k],{n,0,12},{k,0,n}]//扁平(*_G.C.格鲁贝尔,2021年6月7日*)
%o(PARI)T(n,k)=如果(n==k,1,如果(n==k+1,-n,-(n-k)-总和(i=1,n-k-1,i!*T(n-k-i,0));
%o(鼠尾草)
%o缓存函数
%o定义T(n,k):
%o如果(k==n):返回1
%o elif(k==n-1):返回-n
%o else:返回-阶乘(n-k)-和(阶乘(j)*T(n-k-j,0),对于(1..n-k-1)中的j)
%o[[T(n,k)代表k in(0..n)]代表n in(0..12)]#_G.C.格鲁贝尔,2021年6月7日
%Y参见A104980、A104985(行总和)。
%K符号,tabl
%0、5
%A·保罗·D·汉纳,2005年4月10日