提出
经核准的
编辑
囊性纤维变性。A104990号, A104980号, A104990号.
G.C.Greubel,<a href=“/A104991号/b104991.txt“>n表,n=0..440时为a(n)</a>
a(n)=和{k=0..n}A104990号(n,k)。
nmax:=30;
T[n_,k_]:=T[n,k]=如果[k<0|k>n,0,如果[k==n,1,如果[k==n-1,n,k*T[n、k+1]+和[T[j,0]*T[n,j+k+1],{j,0,n-k-1}]];(*T=A104980号*)
M: =M=带[{q=nmax},表[If[j>i,0,T[i,j]],{i,0、q},{j,0,q}]];
f: =f=矩阵幂[M,3];
a[n]:=a[n]=和[f[[n+1,k+1]],{k,0,n}];
表[a[n],{n,0,nmax}](*G.C.格鲁贝尔2021年6月8日*)
_保罗·D·汉纳 (保尔达纳(在)朱诺.通用域名格式), _, 2005年4月10日
OEIS服务器: https://oeis.org/edit/global/213
非n,新的
非n
保罗·D . 汉娜(pauldhanna(AT)juno.com),2005年4月10日
三角形的行和A104990号,等于三角形的矩阵立方体A104980号.
1, 4, 22, 142, 1048, 8704, 80386, 817786, 9093340, 109794556, 1431360958, 20047830262, 300343272952, 4793871035416, 81232799446906, 1456671526257106, 27562347560513524, 548844246683051860, 11474015910364016086
0,2
(PARI){a(n)=如果(n<0,0,sum(k=0,n,(矩阵(n+1,n+1,m,j),如果(m==j,1,if(m==j+1,-m+1,-polcoeff((1-1/sum(i=0,m,i!*x^i))/x+O(x^m),m-j-1)))^-3)[n+1,k+1])}
囊性纤维变性。A104990号,A104980号.
Paul D Hanna(pauldhanna(AT)juno.com),2005年4月10日