|
|
A004533
|
|
Theta series of 12-dimensional unimodular lattice {D_12}^{+}.
|
|
3
|
|
|
1, 0, 264, 2048, 7944, 24576, 64416, 135168, 253704, 475136, 825264, 1284096, 1938336, 2973696, 4437312, 6107136, 8118024, 11354112, 15653352, 19802112, 24832944, 32800768, 42517728, 51523584
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,3
|
|
REFERENCES
|
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 120.
|
|
LINKS
|
|
|
FORMULA
|
Expansion of (theta2(q)^12 + theta3(q)^12 + theta4(q)^12)/2 in powers of q.
|
|
EXAMPLE
|
G.f. = 1 + 264*q^2 + 2048*q^3 + 7944*q^4 + 24576*q^5 + 64416*q^6 + ...
|
|
MATHEMATICA
|
terms = 24; s = (EllipticTheta[2, 0, q]^12 + EllipticTheta[3, 0, q]^12 + EllipticTheta[4, 0, q]^12)/2 + O[q]^terms; CoefficientList[s, q] (* Jean-François Alcover, Jul 05 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|