搜索: 编号:a323436
|
|
|
|
1, 1, 1, 1, 2, 1, 2, 1, 3, 2, 2, 1, 3, 1, 2, 2, 5, 1, 4, 1, 3, 2, 2, 1, 5, 2, 2, 3, 3, 1, 4, 1, 7, 2, 2, 2, 8, 1, 2, 2, 5, 1, 4, 1, 3, 3, 2, 1, 7, 2, 4, 2, 3, 1, 7, 2, 5, 2, 2, 1, 8, 1, 2, 3, 11, 2, 4, 1, 3, 2, 4, 1, 12, 1, 2, 4, 3, 2, 4, 1, 7, 5, 2, 1, 8, 2, 2
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
偏移
|
0,5
|
|
评论
|
用n的素数索引填充Young图,使所有行和列都弱减的方法的数量。
n的素数指数是一个数m,使得素数(m)除以n。n的多素数指数集是A112798号.
|
|
链接
|
|
|
例子
|
a(120)=12个平面分区:
32111
.
311 321 3111 3211
21 11 2 1
.
31 32 311 321
21 11 2 1
1 1 1 1
.
31 32
2 1
1 1
1 1
.
三
2
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[Reverse@*primeMS,Join@@Permutations/@facs[n],{2}]];
表[Length[Select[ptnplane[y],And[And@@GreaterEqual@@@#,And@@(GreaterAqual@@@Transpose[PadRight[#]])]&]],{y,100}]
|
|
交叉参考
|
|
|
关键词
|
非n
|
|
作者
|
|
|
状态
|
经核准的
|
|
|
搜索在0.005秒内完成
|