A022076 Theta series of D*_23 lattice.

1, 0, 0, 0, 46, 0, 0, 0, 1012, 0, 0, 0, 14168, 0, 0, 0, 141726, 0, 0, 0, 1078792, 0, 0, 8388608, 6503112, 0, 0, 0, 31946816, 0, 0, 192937984, 130905236, 0, 0, 0, 457207478, 0, 0, 2122317824, 1392036360, 0, 0, 0, 3784029000, 0, 0, 15049162752, 9401213016, 0, 0

Offset

0,5

References

J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 120.

Links

Andy Huchala, Table of n, a(n) for n = 0..1782

Example

G.f. = 1 + 46*q^4 + 1012*q^8 + ...

Prog

(Magma)
L := Dual(Lattice("D", 23));
B := Basis(ThetaSeriesModularFormSpace(L), 70);
S := [1, 0, 0, 0, 46, 0, 0, 0, 1012, 0, 0, 0];
Coefficients(&+[B[i] * S[i] : i in [1..12]]); // Andy Huchala, Jul 14 2021

Crossrefs

Sequence in context: A089626 A110479 A023934 * A055766 A267319 A261513

Adjacent sequences: A022073 A022074 A022075 * A022077 A022078 A022079

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Andy Huchala, Jul 14 2021

Status

approved