%I M0629 N0230#2019年6月12日09:40:44

%序号1、-2、-3、-5、-6、-10、-11、-17、-21、-27、-33、-46、-53、-68、-82、-104、-123、-154、，

%电话：179、-221、-262、-314、-369、-446、-515、-614、-715、-845、-977、-1148、-1321、，

%U-1544、-1778、-2060、-2361、-2736、-3121、-3592、-4097、-4696、-5340、-6105、-6916、-7822、-88919、-10123、-11429、-12952、-14580

%N Ramanujan模拟θ函数f（q）级数展开式中q^（2n）的系数。

%D N.J.A.Sloane，《整数序列手册》，学术出版社，1973年（包括该序列）。

%D N.J.A.Sloane和Simon Plouffe，《整数序列百科全书》，学术出版社，1995年（包括该序列）。

%H Vaclav Kotesovec，n表，a（n）表示n=0..5000（术语0..1000来自T.D.Noe）

%H L.A.Dragonette，<A href=“http://dx.doi.org/10.1090/S0002-9947-1952-0049927-8“>Ramanujan模拟Theta级数的一些渐近公式</a>，Trans.Amer.Math.Soc.，72（1952），474-500。

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

%F a（n）~-exp（Pi*sqrt（n/3））/（2*sqert（2*n））_Vaclav Kotesovec_，2019年6月12日

%t f[q_，s_]：=和[q^（n^2）/积[1+q^k，{k，n}]^2，{n，0，s}]；取[CoefficientList[Series[f[q，100]，{q，0，100}]，q]，{1，-1，2}]

%o（PARI）a（n）=如果（n<0,0，polceoff（1+总和（k=1，平方（2*n），x^k^2/prod（i=1，k，1+x^i，1+o（x^（2*n）））^2，2*n

%Y A000025（2n）=a（n）。参见A000199。

%K符号

%0、2

%A _N.J.A.斯隆_

%E更多来自_Eric W.Weisstein的术语_