#来自在线整数序列百科全书的问候!http://oeis.org/ 搜索:id:a0558096 展示1-1的1个一个 ;%I a0558096;%S a0558096 1,0,0,3,2,0,6,5,0,0,6,5,0,0,6,5,0,3,0,6,0,6,2,0,6,27,0,60,34,0,0,60,34,0,0,72,51,0,24,24,;%T a058096 70,0,-168101,1,0183134,0,0,54182,0,0,-411240,0450322,018416,0,0,0,1 1240,0450322,018416,0,U a058096-936544,0981696,0282902,0,-19891144,020701462,0597,麦肯锡10%96克的汤普森系列,n=-1..5000的n,a(n)表(G.A.Edgar提供的条款-1..997) %H A058096 D.Ford、J.McKay和S.P.Norton,关于可复制函数的更多信息,通讯代数22,第13期,5175-5193(1994);%H A058096Monster simple group的McKay Thompson系列索引条目%其中F满足Fourier级数(t=1.F)。-_Michael Somos,2015年8月28日 %F A058096 a(3*n-1)=A058601(n)。a(3*n)=0。a(3*n+1)=-3*A192309(n)。-_Michael Somos,2015年8月28日 %F A058096 A-3/A的扩展,其中A=(eta(q^9)^2/(eta(q^3)*eta(q^27))^2,以q.-\u G.C.Greubel的幂次幂函数表示,2018年6月03日2018年3月3日年3月3日 %e A058096 T9d=1/q-3*q+2*q^2+6*q^4+5*q^5+3*q^7+6*q^8-18*q^18*q^10+12*q^11+………;%t A058096A[n[U]:=With[{a=1/q(QPochhammer[q^9]^2/(QPochhammer[q^3]QPochham锤[q^27]))^2},系列系数[a-3/a,{q,0,n}]];;;[a-3/a,{q,0,0,n}]];];];[(*迈克尔·索莫斯,2015年8月28日*) %t A058096预计到达时间:=q^(1/24)*QPochhammer[q];A:=(eta[q^9]^2/(eta[q^3]*eta[q[q[27])))^2;A:=系数系数列表[系列[q*(A-3/A),{q,0,60},q];q];%t A058096表[A[[n]],{n,1,50}](*GG.C.Greubel_,2018年6月3日*)○%o A058096(PARI){A(n)=我(A(A);如果(n<-1,0,0,n++;A=x*o(x(x),[n[n]],[x[n[n]],[x[x[o(x),A=x x x[G^n);A=预计到达时间(x^9+A)^4/(预计到达时间(x^3+A)*预计到达时间(x^27+A))^2;波尔科夫(A-3*x^2/A,n))};/*\u迈克尔·索莫斯,2015年8月28日*/ %Y A058096参见A000521、A007240、A014708、A007241、A007267、A045478等;%Y A058096参见A058601、A192309。 %K A058096 sign %O A058096-1,3 %A A058096 %A A058096 %2000年11月27日 内容可根据OEIS最终用户许可协议获取:http://OEIS.org/License