A022084 Theta series of D*_31 lattice.

1, 0, 0, 0, 62, 0, 0, 0, 1860, 0, 0, 0, 35960, 0, 0, 0, 503502, 0, 0, 0, 5440872, 0, 0, 0, 47229864, 0, 0, 0, 338599360, 0, 0, 2147483648, 2046701220, 0, 0, 0, 10604798246, 0, 0, 66571993088, 47775740520, 0, 0, 0, 189619489320, 0, 0, 998579896320

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..1510

Example

G.f. = 1 + 62*q^4 + 1860*q^8 + ...

Prog

(Magma)
L := Dual(Lattice("D", 31));
B := Basis(ThetaSeriesModularFormSpace(L), 70);
S := [1, 0, 0, 0, 62, 0, 0, 0, 1860, 0, 0, 0, 35960, 0, 0, 0];
Coefficients(&+[B[i] * S[i] : i in [1..16]]); // Andy Huchala, Jul 14 2021

Crossrefs

Sequence in context: A176272 A173418 A147667 * A362452 A110823 A058913

Adjacent sequences: A022081 A022082 A022083 * A022085 A022086 A022087

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Andy Huchala, Jul 14 2021

Status

approved