%I#15 2015年2月24日04:36:30
%S 1,1,3,7,15,29,58118242493997200540248071161833243965003,
%电话:130214260768522084104504520914894185209837397916753651,
%电话:335164196704746134118462268274858536611110733212221468031244293865508588154649
%N N的组成数,使得部件数可以被最小的部件整除。
%H Alois P.Heinz,n的表格,n=1..500时的a(n)</a>
%F G.F.:求和{n>=0}[(1-x^n)/(1-x)^n*求和{d|n}x^(n*d)]。
%F a(n)~2^(n-1).-_瓦茨拉夫·科特索维奇,2014年5月1日
%p b:=proc(n,t,g)选项记忆`如果`(n=0,`如果`(irem(t,g)=0,1,0),加(b(n-i,t+1,min(i,g)),i=1..n))结束:a:=n->b(n,0,无穷大):seq(a(n),n=1..40);#_Alois P.Heinz,2009年12月15日
%t a[n_]:=系列系数[Sum[(1-x^k)/(1-x)^k*Sum[x^(k*d),{d,除数[k]}],{k,0,n}],{x,0,n}];表[a[n],{n,1,40}](*Jean-François Alcover_,2015年2月24日*)
%Y参考A168657。
%K简单,无
%氧1,3
%A_Vladeta Jovovic_,2009年12月13日
%E来自_Alois P.Heinz的更多条款,2009年12月15日
|