|
|
A245667型 |
| {1,…,n}^n中长度为k的最长递增子序列的序列数T(n,k);三角形T(n,k),n>=0,0<=k<=n,按行读取。 |
|
16
|
|
|
1, 0, 1, 0, 3, 1, 0, 10, 16, 1, 0, 35, 175, 45, 1, 0, 126, 1771, 1131, 96, 1, 0, 462, 17906, 23611, 4501, 175, 1, 0, 1716, 184920, 461154, 161876, 13588, 288, 1, 0, 6435, 1958979, 8837823, 5179791, 759501, 34245, 441, 1, 0, 24310, 21253375, 169844455, 157279903, 36156355, 2785525, 75925, 640, 1
(列表;桌子;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,5
|
|
评论
|
和{k=1..n}k*T(n,k)=1975年(n) ●●●●。
|
|
链接
|
|
|
例子
|
T(3,1)=10:[1,1,1]、[2,1,1],[2,2,1]、[2,2,2]、[2,2,2]、[3,1,1]、[3,2,1][3,2],[3,3,1],[3,1]、[3,3,3]。
T(3,3)=1:[1,2,3]。
三角形T(n,k)开始于:
1;
0, 1;
0、3、1;
0, 10, 16, 1;
0, 35, 175, 45, 1;
0, 126, 1771, 1131, 96, 1;
0, 462, 17906, 23611, 4501, 175, 1;
0, 1716, 184920, 461154, 161876, 13588, 288, 1;
...
|
|
MAPLE公司
|
b: =proc(n,l)选项记忆`如果`(n=0,1,加上(b(n-1,[seq(min(l[j],
`如果`(j=1或l[j-1]<i,i,l[j]),j=1..nops(l)]),i=1..l[-1]))
结束:
A: =(n,k)->`如果`(k=0,`如果'(n=0,1,0),b(n,[n$k])):
T: =(n,k)->A(n,k)-`如果`(k=0,0,A(n、k-1)):
seq(seq(T(n,k),k=0..n),n=0..9);
|
|
数学
|
b[n_,l_List]:=b[n,l]=如果[n==0,1,和[b[n-1,表[Min[l[j]],如果[j==1|l[[j-1]]<i,i,l[[j]]],{j,1,长度[l]}],{i,1,l[-1]}]];A[n_,k_]:=如果[k==0,如果[n==0、1、0],b[n,数组[n&,k]];T[n_,k_]:=A[n,k]-如果[k==0,0,A[n、k-1]];表[表[T[n,k],{k,0,n}],{n,0,9}]//展平(*Jean-François Alcover公司2015年2月4日之后阿洛伊斯·海因茨*)
|
|
交叉参考
|
|
|
关键字
|
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
|