A022070 Theta series of D*_17 lattice.

1, 0, 0, 0, 34, 0, 0, 0, 544, 0, 0, 0, 5440, 0, 0, 0, 38114, 131072, 0, 0, 199104, 0, 0, 0, 808384, 2228224, 0, 0, 2641664, 0, 0, 0, 7213984, 17825792, 0, 0, 17215458, 0, 0, 0, 37569728, 91357184, 0, 0, 77129408, 0, 0, 0, 149405248, 347602944, 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..2000

Example

G.f. = 1 + 34*q^4 + 544*q^8 + ...

Prog

(Magma)
L := Dual(Lattice("D", 17));
B := Basis(ThetaSeriesModularFormSpace(L), 2005);
S := [1, 0, 0, 0, 34, 0, 0, 0, 544];
Coefficients(&+[B[i] * S[i] : i in [1..9]]); // Andy Huchala, Jul 13 2021

Crossrefs

Sequence in context: A171705 A228426 A023928 * A123301 A328913 A269482

Adjacent sequences: A022067 A022068 A022069 * A022071 A022072 A022073

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Andy Huchala, Jul 13 2021

Status

approved