%I#20 2016年12月13日20:29:57
%S 1,0,0,0,1,0,1,1,0,2,1,1,0,2,3,1,00,4,3,1,1,0,1,4,6,3,3,1,1,
%温度0,0,7,7,4,3,1,1,0,0,11,9,8,4,3-1,1,0,12,13,15,10,8,4],1,1,0,
%U 14,20,18,17,11,8,4,3,1,1,0,0
%N如果m是最大部分,则包含至少一个其他部分m-k的N的分区T(N,k)的数量;三角形T(n,k),n>=0,0<=k<=n。
%C反向行收敛到A024786。
%H Alois P.Heinz,行n=0..140,扁平</a>
%H维基百科,<a href=“https://en.wikipedia.org/wiki/Kronecker_delta“>克罗内克三角洲</a>
%k列的F G.F:delta_{0,k}+Sum_{i>0}x^(2*i+k)/Product_{j=1..k+i}(1-x^j),其中delta是Kronecker delta。
%e T(4,0)=2:[1,1,1,1],[2,2]。
%e T(4,1)=1:[2,1,1]。
%e T(5,1)=3:[2,1,1],[2,2,1],[3,2]。
%e T(6,2)=3:[3,1,1],[3,2,1],[4,2]。
%e T(7,2)=4:[3,1,1,1],[3,2,1,1],[3,3,1],[2,2,1]。
%e T(8,4)=3:[5,1,1],[5,2,1],[6,2]。
%e三角形T(n,k)开始:
%e 1;
%e 0,0;
%e 1,0,0;
%e 1,1,0,0;
%e 2,1,1,0,0;
%e 2、3、1、1、0、0;
%e 4、3、3、1、1、0、0;
%e 4、6、4、3、1、1、0、0;
%e第7、7、7,4、3、1、1、0、0条;
%p b:=proc(n,i)选项记忆;
%p`if`(n=0或i=1,1,b(n,i-1)+` if`(i>n,0,b(n-i,i))
%p端:
%p T:=(n,k)->`如果`(n=0且k=0,1,
%p加(b(n-2*m-k,最小值(n-2*m-k,m+k)),m=1..(n-k)/2):
%p序列(序列(T(n,k),k=0..n),n=0..14);
%tb[n_,i_]:=b[n,i]=如果[n==0||i==1,1,b[n、i-1]+如果[i>n,0,b[n-i,i]]];t[n_,k_]:=如果[n==0&&k==0,1,和[b[n-2*m-k,Min[n-2*m-k,m+k]],{m,1,(n-k)/2}]];表[表[t[n,k],{k,0,n}],{n,0,14}]//Flatten(*_Jean-François Alcover_,2013年12月13日,翻译自Maple*)
%Y列k=0-10表示:A002865、A083751(n+1)、A119907、A212543、A212544、A212545、A212546、A212547、A212548、A212549、A212550。
%Y行总和给出n>1时的A000070(n-2)。
%Y参考A024786。
%K nonn,表
%O 0,11号
%A _Alois P.Heinz,2012年5月20日