登录
A323450型
用求和到n的正整数填充Young图的方法的数量,使得所有行和列都弱增加。
5
1, 1, 3, 6, 14, 26, 56, 103, 203, 374, 702, 1262, 2306, 4078, 7242, 12628, 21988, 37756, 64682, 109606, 185082, 309958, 516932, 856221, 1412461, 2316416, 3783552
抵消
0,3
评论
形状y的广义Young表是用正整数替换y的Ferrers图中的点而得到的数组。
链接
n实验室,Young图表.
无悔数学家博客,广义杨表.
例子
a(4)=14广义杨表:
4 1 3 2 2 1 1 2 1 1 1 1
.
1 2 1 1 1 2 1 1 1 1 1
3 2 2 1 1 1 1
.
1 1 1
1 1
2 1
.
1
1
1
1
a(5)=26广义杨表:
5 1 4 2 3 1 1 3 1 2 2 1 1 1 2 1 1 1 1 1
.
1 2 1 1 1 3 1 2 1 1 1 1 1 1 1 2 1 1 1 1 1 1 1
4 3 3 1 2 1 2 2 1 1 1 1
.
1 1 1 1 1 2 1 1 1 1 1
1 2 1 1 1 1 1
3 2 2 1 1 1
.
1 1 1
1 1
1 1
2 1
.
1
1
1
1
1
数学
素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];
facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,Select[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];
ptnplane[n_]:=并集[Map[primeMS,Join@@Permutations/@facs[n],{2}]];
表[Sum[Length[Select[ptnplane[Times@@Prime/@y],And@@(LessEqual@@@Transpose[PadRight[#]/.(0->Infinity)])&]],{y,Integer Partitions[n]}],{n,10}]
关键词
非n,更多
作者
古斯·怀斯曼2019年1月16日
扩展
a(16)-a(26)来自Seiichi Manyama先生2020年8月19日
状态
经核准的