|
|
A263756型 |
| 按行读取的三角形:T(n,k)(n>=0,k>=0)是n的排列数,下降总和底部等于k。 |
|
5
|
|
|
1, 1, 1, 1, 1, 3, 1, 1, 1, 7, 3, 8, 3, 1, 1, 1, 15, 7, 34, 18, 14, 18, 8, 3, 1, 1, 1, 31, 15, 122, 72, 69, 147, 83, 71, 33, 45, 18, 8, 3, 1, 1, 1, 63, 31, 406, 252, 263, 822, 544, 554, 399, 613, 351, 307, 160, 102, 96, 45, 18, 8, 3, 1, 1, 1, 127, 63, 1298, 828
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
0,6
|
|
评论
|
|
|
链接
|
|
|
例子
|
三角形开始:
1;
1;
1,1;
1,3,1,1;
1,7,3,8,3,1,1;
1,15,7,34,18,14,18,8,3,1,1;
1,31,15,122,72,69,147,83,71,33,45,18,8,3,1,1;
...
|
|
MAPLE公司
|
b: =进程选项记住;(n->`如果`(n=0,1,展开(
加法(b(s减去{j})*`if`(j<n,x^j,1),j=s))(nops)
结束时间:
T: =n->(p->seq(系数(p,x,i),i=0..度(p))(b({$1..n})):
seq(T(n),n=0..9)#阿洛伊斯·海因茨2015年10月25日,修订日期:2023年1月31日
|
|
数学
|
b[s_]:=b[s]=与[{n=Length[s]},如果[n==0,1,展开[Sum[b[s~补码~{j}]*If[j<n,x^j,1],{j,s}]]];
T[n_]:=系数列表[b[范围[n]],x];
|
|
交叉参考
|
|
|
关键词
|
非n,标签
|
|
作者
|
|
|
扩展
|
两个术语(用于第0行和第1行)在前面加了前缀,更多术语来自阿洛伊斯·海因茨2015年10月25日
|
|
状态
|
已批准
|
|
|
|