登录
如果m是最大部分,则包含至少一个其他部分m-k的n的分区T(n,k)的数量;三角形T(n,k),n>=0,0<=k<=n。
9

%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日