| 数学
|
S[i_,j_]:=S[i,j]=和[M[i,k]*M[k,j],{k,0,i}];M[i_,j_]以下为:=_]以下为:=M(M)[我,j个] =如果[j个==0||我==j个,1,总和[S公司[我-1,k个]*M(M)[k个,j] =-1], {k个,0,我-1}]];表[表[S公司[n个,k个], {k个,0,n个}], {n个,0,10}] //压扁(* _牛仔-弗兰ç操作系统 阿尔科弗_,3月 06 2015,之后_阿洛伊斯 P(P).亨氏(Heinz)_ *)
如果[j==0||i==j,1,和[S[i-1,k]*M[k,j-1],{k,0,i-1}]];表[表[S[n,k],{k,0,n}],{n,0,10}]//展平(*Jean-François Alcover公司,2015年3月6日,之后阿洛伊斯·海因茨*)
|