%I#39 2020年11月11日08:28:16
%S 1,-1,-2,-1,0,4,4,7,3,-2,-9,-17,-25,-24,-13,-1,32,61,97111112,74,8,
%电话:-108、-243、-392、-512、-569、-542、-358、-3347310781788239528652955,
%U 25691496、-245、-2751、-5783、-9121、-12299、-14739、-15806、-14719、-10930、-38136593202843630816862080539
%负整数的N Euler变换。
%C 1/A(x)是A000219的g.f。
%H Seiichi Manyama,n表,n(n)表示n=0..10000(Vaclav Kotesovec的术语0..1000)
%H E.M.Wright,<a href=“http://dx.doi.org/10.1093/qmath/17.1.39“>互易生成函数的系数,Quart.J.Math.17(1)(1966)39-43,<a href=”http://adsabs.harvard.edu/abs/1966QJMat..17…39W“>ADS摘要。
%H N.J.A.Sloane,转换</a>
%F G.F.:产品{k>0}(1-x^k)^k。
%F a(n)=-1/n*和{k=1..n}σ[2](k)*a(n-k)。
%F G.F.:exp(总和{n>=1}-西格玛_2(n)*x^n/n)_Seiichi Manyama,2017年3月4日
%p a:=proc(n)选项记住`如果`(n=0,1,-add(
%p数字理论[西格玛][2](j)*a(n-j),j=1..n)/n)
%p端:
%p序列(a(n),n=0..60);#_阿洛伊斯·海因茨(Alois P.Heinz),2015年3月12日
%t nmax=50;系数列表[系列[Exp[Sum[-x^k/(k*(1-x^k)^2),{k,1,nmax}]],{x,0,nmax{],x](*_Vaclav Kotesovec_,2015年3月2日*)
%ta[n_]:=a[n]=-1/n*和[DivisorSigma[2,k]*a[n-k],{k,1,n}];a[0]=1;表[a[n],{n,0100}](*_Vaclav Kotesovec_,2015年3月2日*)
%o(SageMath)#使用[EulerTransform from A166861]
%o b=欧拉变换(λn:-n)
%o打印([b(n)代表范围(55)内的n)]#_Peter Luschny_,2020年11月11日
%A283272的Y列k=1。
%Y参见A000219、A001157、A001478、A026007、A156616、A255528。
%K符号
%O 0.3
%A _弗拉德塔·乔沃维奇,2002年8月28日
|