登录
对k进行编号,使k的三个适当除数子集与k相加。
1

%I#10 2020年1月13日09:34:26

%S 30,40,54350380414500532544558608620644667267401372,

%电话:20022190236823702490262426262626726702910303090316232103250,

%电话:32703390341034303810388039304041104120412041704280436044704524530

%N对k进行编号,使k的三个适当除数子集与k相加。

%C或编号k,使A065205(k)=3。

%H Amiram Eldar,n的表,n=1..1000的a(n)</a>

%e适当的除数为30={1,2,3,5,6,10,15}和30=5+10+15=2+3+10+15=1+3+5+6+15。

%t seqQ[n_]:=模[{d=Most[Divisors[n]]},级数系数[Series[Product[1+x^d[[i]],{i,Length[d]}],{x,0,n}],n]==3];选择[Range[1000],seqQ[#]&](*_Amiram Eldar_,2020年1月13日*)

%Y参考A064771、A065205、A065235、A152615。

%K nonn公司

%O 1,1号机组

%A_Zak Seidov,2009年10月29日