|
| |
|
| A191714号 |
| a（n，k）等于n的分区形状和最大元素<=k的半标准Young表的个数。 |
|
8
|
|
|
|
1, 1, 4, 1, 6, 19, 1, 9, 39, 116, 1, 12, 69, 260, 751, 1, 16, 119, 560, 1955, 5552, 1, 20, 189, 1100, 4615, 15372, 43219, 1, 25, 294, 2090, 10460, 40677, 131131, 366088, 1, 30, 434, 3740, 22220, 100562, 370909, 1168008, 3245311, 1, 36, 630, 6512, 45628, 239316, 1007083, 3570240, 11042199, 30569012, 1, 42, 882, 10868, 89420, 541926, 2596573, 10347864, 35587071, 108535130, 299662672, 1, 49, 1218, 17732, 170340, 1188341, 6466159, 28915056, 110426979, 370661885, 1117689232, 3079276708
(列表；桌子；图表；参考；听；历史；文本；内部格式)
|
|
|
|
偏移
|
1,3
|
|
|
评论
|
最大元素可以是任何整数，但此处选择为<=n。
|
|
|
链接
|
|
|
|
例子
|
对于n=3和k=2，SSYT为
par={3}SSYT={{1，1，1}}，{{2，1，1}}
par={2,1}SSYT={{2，1}，{1}}
par={1,1,1}SSYT=无
计数4+2+0=6=a（3,2）。
表格开始：
1；
1, 4;
1, 6, 19;
1, 9, 39, 116;
1、12、69260751；
1, 16, 119, 560, 1955, 5552;
1, 20, 189, 1100, 4615, 15372, 43219; ...
|
|
|
数学
|
需求[“Combinatorica`”]；
hooklength[（p_）？PartitionQ]：=块[{ferr=（PadLeft[1+0*Range[#1]，Max[p]&）/@p}，DeleteCases[（Rest[FoldList[Plus，0，#1]]&）/@ferr+Reverse/@Reverse[Transpose[（Rest[FoldList[Plus、0，#1]]]&）/@反向[Reverse/@Transpose[ferr]]]，0，-1]；
content[（p_）？分区Q]：=块[{le=Max[p]，ferr=（PadLeft[1+0*Range[#1]，Max[p]]&）/@p}，删除案例[MapIndexed[-le+Range[le，1，-1]-#1-Tr[#2]&，0*ferr]*ferr，0，-1]+le]；
stanley[（p_）？分区Q，t_Integer]：=倍@@（（t+展平[content[p]]）/展平[hooklength[p]]）；
表[Tr[stanley[#，k]&/@Partitions[n]]，{n，12}，{k，n}]
|
|
|
交叉参考
|
|
|
|
关键词
|
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
