登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A323436飞机 其部分是n的素数指标的平面分区数。 17

%I#4 2019年1月15日18:45:43

%S 1,1,1,1,2,1,2,1,1,3,2,1,3,1,2,5,1,4,1,3,2,2,1,5,2,3,3,1,4,7,2,

%温度2,2,8,1,2,2,5,1,4,1,3,3,2,1,7,2,3,1,7,2,5,2,1,8,1,2,3,12,4,1,

%U 3,2,4,1,12,1,2,4,3,2,4-1,7,5,2,1,8,2,2

%N部分是N的素数指标的平面分区数。

%C用n的素数索引填充Young图以使所有行和列都弱递减的方法的数目。

%C n的素数指数是一个数m,素数(m)除以n。n的多素数指数集是A112798的第n行。

%e a(120)=12个平面隔板:

%电话:32111

%e、。

%电子311 321 3111 3211

%e 21 11 2 1

%e、。

%e 31 32 311 321电话

%e 21 11 2 1

%e 1 1 1 1

%e、。

%e 31 32

%e 2 1个

%e 1 1

%e 1 1

%e、。

%e三

%第2页

%第1页

%第1页

%第1页

%t素数MS[n_]:=如果[n==1,{},扁平[Cases[FactorInteger[n],{p_,k_}:>表[PrimePi[p],{k}]]];

%t facs[n_]:=如果[n<=1,{{}},连接@@表[Map[Prepend[#,d]&,选择[facs[n/d],Min@@#>=d&]],{d,Rest[Divisors[n]]}];

%t ptnplane[n_]:=并集[Map[Reverse@*primeMS,Join@@Permutations/@facs[n],{2}]];

%t表[Length[Select[ptnplane[y],And[And@@GreaterEqual@@@#,And@@(GreaterEqual@@@Transpose[PadRight[#]])]&],{y,100}]

%Y参见A000085、A000219、A003293、A056239、A112798、A114736、A117433、A138178、A296188、A299968。

%Y参考A323300、A323429、A323437、A32343、A323499。

%K nonn公司

%0、5

%A _Gus Wiseman_,2019年1月15日

查找|欢迎|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年3月29日04:23。包含371264个序列。(在oeis4上运行。)