%I#10 2020年1月31日21:50:51
%S 1,0,1,1,2,1,4,1,5,3,8,1,16,1,16,9,22,1,51,1,511,17,57,1147,7102,30,
%电话152,1620,1231,58298,21946,1491103921,13249,110603251256,1,
%U 4866、1531572992539、110369、6248464924566、145786、16843
%N将N划分为公共因子>1且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:gcd(n,k)>1}1/(1-x^k)。
%e a(6)=4,因为我们有[6],[4,2],[3,3]和[2,2,2]。
%p a:=proc(m)选项记忆;局部b;b:=
%p过程(n,i)选项记忆`如果`(n=0,1,`如果`(i<2,0,
%p`if`(igcd(i,m)>1,b(n-i,min(i,n-i)),0)+b(n,i-1))
%p端;忘记(b);b(百万美元)
%p端:
%p序列(a(n),n=0..82);#_阿洛伊斯·海因茨,2020年1月30日
%t表[级数系数[积[1/(1-布尔[GCD[k,n]>1]x^k),{k,1,n}],{x,0,n}],{n,0,62}]
%Y参考A182986(1的位置)、A018783、A057562、A121998、A331887、A33188。
%K nonn公司
%0、5
%A _Ilya Gutkovskiy_,2020年1月30日
|