%I#9 2018年7月9日17:20:38
%S 1,1,1,1,2,2,1,4,6,7,12,2,19,11,37,44,3,66,3,2,3138,6196,5275,6,
%电话380,1520607,6,12,5,181268,17,11,22214,12898,30,21,384872,51,
%电话:6267,54,35,6310219,84,43,91,6110720587,22579315010535924112,149646247180,1
%N将N划分为与N具有相同数量的不同素数因子的部分的次数。
%H Alois P.Heinz,n的表格,n=0..1000时的a(n)</a>
%H<a href=“/index/Par#part”>与分区相关的序列的索引条目</a>
%F a(n)=[x^n]产品{ω(k)=ω(n)}1/(1-x^k)。
%e a(18)=3,因为我们有[18]、[12、6]和[6、6、6],其中18、12和6是可以被两个不同素数整除的数字。
%p(数字理论):
%p a:=proc(m)选项记忆;局部k,b;k、 b:=nops(系数集(m)),
%p过程(n,i)选项记忆`如果`(n=0,1,`如果`(i<1,0,
%p b(n,i-1)+`if`(nops(因子集(i))=k,b(n-i,min(i,n-i)),0))
%p端:b(2百万美元)
%p端:
%p序列(a(n),n=0..80);#_Alois P.Heinz,2018年3月17日
%t表[级数系数[积[1/(1-布尔[PrimeNu[k]==PrimeNu[n]]x^k),{k,1,n}],{x,0,n}],{n,0,70}]
%Y参见A001221、A300977、A30097、A300980、A30098、A300993。
%K nonn公司
%0、5
%A _Ilya Gutkovskiy_,2018年3月17日
|