A022055 Theta series of D_24 lattice.
1, 1104, 170064, 8662720, 195082320, 2319457632, 17231109824, 93703589760, 407488018512, 1487286966928, 4744779429216, 13523760003648, 35250721087168, 84944161233120, 192127452262272, 409984511707776, 834658207381584, 1624411151609760, 3049176879087248, 5521413521657280
Offset: 0
Keywords
References
- J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 118.
Links
- Seiichi Manyama, Table of n, a(n) for n = 0..1000
Programs
-
Mathematica
terms = 16; s = 1/2 (EllipticTheta[3, 0, q]^24 + EllipticTheta[4, 0, q]^24) + O[q]^(2 terms); CoefficientList[s, q^2] (* Jean-François Alcover, Jul 07 2017, after LatticeData(D24) *)
Formula
This series is the q-expansion of 11/9 E_4(z)^3 - 2/9 E_6(z)^2. Cf. A004009, A013973. - Daniel D. Briggs, Nov 26 2011
Extensions
More terms from Seiichi Manyama, Oct 16 2018