%I#27 2019年2月19日20:17:15
%S 1,1,1,1,3,4,3,1,1,5,13,23,30,23,13,5,1,1,7,26,68139234334411,
%电话:440411334234139,68,26,7,1,1,9,431453868601660283843626090,
%电话:777991359892989291357779609043622838166086036145,43,9,1
%N×N个二元矩阵X射线的N个T(N,k);三角形T(n,k),n>=0,0<=k<=n^2,按行读取。
%矩阵的X射线定义为反对角线和的序列。
%C T(n,k)定义为所有n,k>=0。三角形只包含正项。对于k>n^2,T(n,k)=0。
%H Alois P.Heinz,行n=0..40,扁平</a>
%H C.Bebeacua、T.Mansour、A.Postnikov和S.Severini,<A href=“https://arxiv.org/abs/math/0506334“>关于排列的X射线,arXiv:math/0506334[math.CO],2005。
%H<a href=“/index/Mat#binmat”>与二进制矩阵相关的序列的索引项</a>
%F T(n,楼层(n^2/2))=A290058(n)。
%F(n,k)=T(n,n^2-k)。
%e三角形T(n,k)开始:
%e 1;
%e 1,1;
%e 1、3、4、3、1;
%e 1、5、13、23、30、30、23、13、5、1;
%e第1、7、26、68、139、234、334、411、440、411,334、234,139、68、26、7、1条;
%e。。。
%pb:=proc(n,i,t)选项记忆;(m->`if`(n>m,0,`if`)(n=m,1,
%p加(b(n-j,i-t,1-t),j=0..分钟(i,n)))(i*(i+1-t))
%p端:
%p T:=(n,k)->b(k,n,1):
%p序列(序列(T(n,k),k=0..n^2),n=0..7);
%tb[n_,i_,t_]:=b[n,i,t]=函数[{m,jm},如果[n>m,0,如果[n==m,1,和[b[n-j,i-t,1-t],{j,0,jm{]]][i*(i+1-t),最小值[i,n]];T[n_,k_]:=b[k,n,1];表[T[n,k],{n,0,7},{k,0,n^2}]//Flatten(*_Jean-François Alcover_,2017年8月9日,翻译自Maple*)
%Y列k=0-2给出:对于n>1,A000012、A004273、A091823(n-1)。
%Y主对角线给出A290052。
%Y行总和表示A010790。
%Y参考A000290,A290058。
%K nonn,标签
%0、5
%A _Alois P.Heinz,2017年7月19日
|