The OEIS Foundation is supported by donations from users of the OEIS and by a grant from the Simons Foundation.

 Hints (Greetings from The On-Line Encyclopedia of Integer Sequences!)
 A058483 McKay-Thompson series of class 12E for the Monster group. 3
 1, -1, 7, -9, 10, -23, 38, -47, 75, -112, 148, -217, 293, -385, 553, -728, 928, -1272, 1670, -2111, 2765, -3566, 4504, -5784, 7300, -9123, 11592, -14458, 17838, -22342, 27668, -33884, 41843, -51344, 62548, -76515, 92989, -112514, 136687, -164961, 198190, -238991 (list; graph; refs; listen; history; text; internal format)
 OFFSET 0,3 COMMENTS Given g.f. A(x), B(q) = q*A(q^2) satisfies 0 = f(B(q). B(q^2)) where f(u, v) = 12 + v^2 - 2*u^2 - u^2*v. - Michael Somos, Apr 21 2004 LINKS Vaclav Kotesovec, Table of n, a(n) for n = 0..5000 (terms 0..501 from G. A. Edgar) D. Ford, J. McKay and S. P. Norton, More on replicable functions, Commun. Algebra 22, No. 13, (1994), 5175-5193. FORMULA a(n) ~ (-1)^n * exp(sqrt(2*n/3)*Pi) / (2^(5/4)*3^(1/4)*n^(3/4)). - Vaclav Kotesovec, Sep 08 2017 Expansion of F - 3*q/F, where F = q^(1/2)*(eta(q^2)^2 * eta(q^3)/(eta(q) * eta(q^6)^2))^2 in powers of q. - G. C. Greubel, Jun 03 2018 EXAMPLE G.f. = 1 - x + 7*x^2 - 9*x^3 + 10*x^4 - 23*x^5 + 38*x^6 - 47*x^7 + ... T12E = 1/q - q + 7*q^3 - 9*q^5 + 10*q^7 - 23*q^9 + 38*q^11 - 47*q^13 + ... MATHEMATICA QP = QPochhammer; A = O[q]^50; A = ((QP[q^2 + A]^2*QP[q^3 + A])/(QP[q + A]* QP[q^6 + A]^2))^2; s = A - 3*(q/A); CoefficientList[s, q] (* Jean-François Alcover, Nov 13 2015, adapted from PARI *) eta[q_]:= q^(1/24)*QPochhammer[q]; F:= q^(1/2)*(eta[q^2]^2*eta[q^3]/(eta[q]*eta[q^6]^2))^2; a := CoefficientList[Series[F - 3*q^1/F, {q, 0, 60}], q]; Table[a[[n]], {n, 1, 50}] (* G. C. Greubel, Jun 03 2018 *) PROG (PARI) {a(n) = local(A); if( n<0, 0, A = x^2 * O(x^n); A = ((eta(x^2 + A)^2 * eta(x^3 + A)) / (eta(x + A) * eta(x^6 + A)^2))^2; polcoeff( A - 3*x / A, n))}; /* Michael Somos, Apr 21 2004 */ CROSSREFS Cf. A000521, A007240, A014708, A007241, A007267, A036018, A045478, etc. Sequence in context: A118621 A117933 A112162 * A176326 A283056 A162308 Adjacent sequences:  A058480 A058481 A058482 * A058484 A058485 A058486 KEYWORD sign AUTHOR N. J. A. Sloane, Nov 27 2000 STATUS approved

Lookup | Welcome | Wiki | Register | Music | Plot 2 | Demos | Index | Browse | More | WebCam
Contribute new seq. or comment | Format | Style Sheet | Transforms | Superseeker | Recent
The OEIS Community | Maintained by The OEIS Foundation Inc.

Last modified May 26 09:29 EDT 2020. Contains 334620 sequences. (Running on oeis4.)