%I#8 2018年11月20日12:21:25

%S 1,1,1,3,1,4,10,9,5,1,20,1,6,14,47,1,50,1,30,20,7,1110,29,8157,42，

%电话：1,97,1246,27,9,49338,1,10,35206,1159,1,56353,11,1732,99224,44，

%U 72,11184,76332,54,12,1743,1,136771602111242,1,90

%N具有Heinz数N的整数分划的初等对称函数中单项式对称函数的系数之和。

%整数分区的Heinz数（y_1，…，y_k）是素数（y_1）*…*质数（yk）。

%C也是多重数为n的素数指标的多集（如A305936的第n行）的集多部分（集的多集）的大小保护置换数。

%e e（211）=2m（22）+m（31）+5m（211）+12m（1111）的系数之和是a（12）=20。

%e集多部分的a（2）=1到a（9）=9大小保留排列：

%e{1}{1}{1}}{12}{1}{1{1}{1}}{1

%e｛1｝｛2｝｛1｝｛1｝｛2｝｛1｝｛23｝｛1｝｛2｝｛12｝

%e{2}{1}{1{2}{1}}{2}}{13}{2{1}{12}

%e{2}{1}{1{3}{12}{1}{2}}{2}

%e{1}{2}{3}{1}}{2{1}{2}

%e{1}{3}{2}{1}{2}{2}{1}

%e{2}{1}{3}{2}{1}{2}

%e{2}{3}{1}{2}}{1{2}{1}

%e{3}{1}{2}{2{2}}{1{1}

%e{3}{2}{1}

%sps[{}]：={{}}；sps[set:{i_，___}]：=联接@@函数[s，前缀[#，s]和/@sps[Complement[set，s]]/@Cases[子集[set]，{i，___}]；

%t mps[set_]：=并集[Sort[Sort/@（#/.x_Integer:>set[[x]]）]和/@sps[Range[Length[set]]]；

%t nrmptn[n_]：=联接@@MapIndexed[表[#2[[1]]，{#1}]&，如果[n==1，{}，展平[Cases[FactorInteger[n]//反转，{p_，k_}:>表[PrimePi[p]，{k}]]]；

%t表[Sum[Times@@Factorial/@Length/@Split[Sort[Length@@mtn，Greater]]/Times@@Factorional/@Length/@Split[mtn]，{mtn，Select[mps[nrmptn[n]]，And@@UnsameQ@@#&]}]，{n，30}]

%A321742的Y行总和。

%Y参见A005651、A008480、A049311、A056239、A116540、A124794、A12479、A181821、A296150、A318360、A319193、A319225、A319226、A321738、A321742-A321765。

%K nonn公司

%O 1,4型

%A _Gus Wiseman_，2018年11月19日