A015236 Theta series of lattice Kappa_7.

1, 0, 92, 64, 436, 320, 1248, 640, 2476, 1024, 5080, 1984, 6170, 2944, 11704, 3840, 13860, 6144, 19964, 7744, 24064, 8768, 36944, 12800, 33888, 15360, 54808, 16768, 57176, 22464, 71416, 25984, 79628, 27648, 107128, 35840, 93844, 41984, 143888, 42112, 137720

Offset

0,3

References

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

Links

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

G. Nebe and N. J. A. Sloane, Home page for this lattice

Example

G.f. = 1 + 92*q^4 + 64*q^6 + ...

Prog

(Magma)
L := (Lattice("Kappa", 7));
B := Basis(ThetaSeriesModularFormSpace(L), 30);
S := [1, 0, 92, 64, 436, 320, 1248, 640, 2476, 1024, 5080, 1984, 6170, 2944, 11704, 3840, 13860, 6144, 19964, 7744, 24064, 8768, 36944, 12800, 33888, 15360];
Coefficients(&+[B[i] * S[i] : i in [1..26]]); // Andy Huchala, Jul 18 2021

Crossrefs

Sequence in context: A075479 A081222 A033412 * A057702 A039549 A101287

Adjacent sequences: A015233 A015234 A015235 * A015237 A015238 A015239

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Sean A. Irvine, Feb 25 2020

Status

approved