%I#17 2021年3月12日22:24:47

%S 1,2,0，-4，-6,0,12,16,0，-28，-36,0,60,76,0，-120，-150,022880,0，-416，

%电话：-504,0732878,0，-1252，-1488,0208824,0，-3408，-3996,054606364,0，

%U-8600，-9972,01334415400,0，-20424，-23472,03087635346,0，-46152，-52644

%Nφ（q）*φ（q^9）/phi（q^3）^2的q次幂展开式，其中phi（）是Ramanujanθ函数。

%C Ramanujan theta函数：f（q）（见A121373）、phi。

%H G.C.Greubel，n表，n=0..2500时的a（n）</a>

%H Michael Somos，Ramanujan theta函数简介</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/RamanujanThetaFunctions.html“>Ramanujan Theta函数</a>

%F以q的幂展开eta（q^2）^5*eta（q ^3）^4*eta。

%周期36序列[2，-3，-2，-1，2，3，2，-1，0，-3，2，1，2，-3，-2，-1。

%F G.F.是周期1傅里叶级数，满足F（-1/（36 t））=F（t），其中q=exp（2 Pi it）。

%F a（n）=2*A233670（n），除非n=0。

%e G.f=1+2*q-4*q^3-6*q^4+12*q^6+16*qq^7-28*q^9-36*q^10+。。。

%t a[n_]：=级数系数[EllipticTheta[3，0，q]椭圆Theta[3,0，q^9]/椭圆Theta[3]^2，{q，0，n}]；（*迈克尔·索莫斯，2015年8月27日*）

%o（PARI）{a（n）=我的（a）；如果（n<0，0，a=x*o（x^n）；polceoff（eta（x^2+a）^5*eta（x^3+a）^4*eta）}；

%Y参考A233670。

%K符号

%0、2

%A _迈克尔·索莫斯，2013年12月14日