%I#9 2021年3月12日22:24:47
%S 1,-2,1,0,0,0,-2,2,0,2,-2,0,0-1,0,-2,0,0,1,0,-2,-2,0,0,0,
%T 0,2,0,2,0,0,-2,0,0,0,0,0,1,-2,2,0,1,
%U 2,0,0,0.0,-2,0,0,0,0,1,0,2,0,2,0,-2,0
%N f(-x^1,-x^7)^2以x的幂展开,其中f()是Ramanujan的二变量θ函数。
%H G.C.Greubel,n表,n=0..1000时的a(n)</a>
%H Michael Somos,《Ramanujan theta函数简介》</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/RamanujanThetaFunctions.html“>Ramanujan Theta函数</a>
%F G.F.:F(-x,-x^7)^2=(Z}(-1)^k*x^(4*k^2-3*k)中的和{k)^2。
%F A244525的卷积平方。
%F a(9*n)=A244526(n)。a(9*n+3)=a(9xn+6)=0。a(49*n+5)=a(n-1)。
%e G.f=1-2*x+x^2-2*x^7+2*x^8+2*x^10-2*x*11+x^14-2*x^17+。。。
%e G.f.=q^9-2*q^17+q^25-2*q^65+2*q^73+2*q ^89-2*qq^97+q^121+。。。
%t A244560[n_]:=系列系数[(QPochhammer[q^1,q^8]*QPochhammer[q^7,q^8]*QPochhammer[q^8,q^8])^2,{q,0,n}];表[A244560[n],{n,0,50}](*_G.C.Greubel_,2017年6月17日*)
%o(PARI){a(n)=(-1)^n*和(k=0,n,发行方(16*k+9)*发行方(16*(n-k)+9))};
%Y参见A244525、A244256。
%K符号
%0、2
%2014年6月30日,A _Michael Somos
|