%I#12 2019年4月14日07:51:38
%S 0,1,-2,-2,10,14,-86,-1268581302,-9378,-14606108954172698,
%电话:1319966,-21191181648959426731542,-210887998,-344901702747510514,
%电话:4515757426,-36336187630,-60023827438486540793914807121753178,-6582918170714,-10959634267889860268098
%N G.f.A(x)满足:A(x。
%F G.F.:A(x)=和{n>=1}A(n)*x^n=x*产品{n>=1}((1+x^n)/(1-x^n。
%F递归:a(n+1)=(2/n)*和{k=1..n}(和{d|k,k/d奇数}(-1)^d*d*a(d))*a(n-k+1)。
%通用公式:A(x)=x-2*x^2-2*x ^3+10*x ^4+14*x ^5-86*x ^6-126*x ^7+858*x ^8+1302*x ^9-9378*x ^10-14606*x ^11+。。。
%t项=28;A[_]=0;Do[A[x_]=x Exp[Sum[2A[-x^(2k-1)]/(2k-1),{k,1,terms}]]+O[x]^(terms+1)//正常,terms+1];系数列表[A[x],x]
%t a[n]:=a[n]=系列系数[x乘积[((1+x^k)/(1-x^k))^((-1)^k a[k]),{k,1,n-1}],{x,0,n}];a[0]=0;表[a[n],{n,0,28}]
%Y参考A000081、A004111、A045648、A049075、A073075、A115593、A306768、A307365、A307366。
%K符号
%0、3
%A _Ilya Gutkovskiy_,2019年4月14日
|