%I#28 2018年6月19日12:33:32
%S 1,1,1,1,3,4,4,4],7,8,10,11,12,16,18,22,25,28,34,38,45,51,58,69,77,
%电话88,99112131146165184206238266298331368418465520576,
%电话:6377147918809731074119413145516041766195421452360
%怪物组60E级的N McKay Thompson系列。
%C Ramanujan theta函数:f(q)(见A121373)、phi。
%H G.C.Greubel,n表,n=0..1000时的a(n)</a>
%H D.Ford、J.McKay和S.P.Norton,<a href=“http://dx.doi.org/101080/00927879408825127“>关于可复制函数的更多信息,Comm.Algebra 22,No.13,5175-5193(1994)。
%H<a href=“/index/Mat#McKay_Thompson”>Monster简单组的McKay-Thompson系列索引条目</a>
%F chi(-x^3)*chi_Michael Somos,2012年6月9日
%F G.F.是周期1傅里叶级数,满足F(-1/(120 t))=F(t),其中q=exp(2 Pi it)_Michael Somos,2012年6月9日
%F卷积平方是A205962_Michael Somos,2012年6月9日
%F a(n)~exp(2*Pi*sqrt(n/15))/(2*15^(1/4)*n^(3/4))_瓦茨拉夫·科特索维奇,2015年9月6日
%2018年6月19日,q·G·C·格鲁贝尔(q.C.Greubel)权力下q·(1/2)*eta(q^2)*eta-
%e 1+x+x ^2+x ^3+x ^4+3*x ^5+3*x^6+4*x ^7+4*x^8+4*x ^9+7*x ^10+。。。
%e T60E=1/q+q+q^3+q^5+q^7+3*q^9+3*q ^11+4*q ^13+4*q^15+4*q ^17+。。。
%t nmax=50;系数列表[系列[产品[(1+x^k)*(1+x^(5*k))/(1+x ^(3*k),*(1+x^(15*k))),{k,1,nmax}],{x,0,nmax{],x](*Vaclav Kotesovec_,2015年9月6日*)
%t eta[q_]:=q^(1/24)*q赭锤[q];a: =系数列表[级数[q^(1/2)*eta[q^2]*eta[q^3]*eta[0q^10]*eta[q^15]/(eta[q]*eta[q^5]*etb[q^6]*eta-[q^30]),{q,0,60}],q];表[a[[n]],{n,1,50}](*_G.C.Greubel_,2018年6月19日*)
%o(PARI){a(n)=局部(a);如果(n<0,0,a=x*o(x^n);polceoff(eta(x^2+a)*eta(x^3+a)*et(x^10+a)*eta(x ^15+a)/(eta*/
%Y参考A205962。
%K nonn公司
%0、6
%A _N.J.A.Sloane,2000年11月27日
|