A022047 Theta series of D_16 lattice.

1, 480, 29152, 525952, 3994080, 18626112, 67978880, 197120256, 509145568, 1143441760, 2428524096, 4658843520, 8705492608, 15000919872, 25593401600, 40864033536, 65187410400, 98098623936, 148724365664, 213678303360, 310833534528, 430766443520, 605650030464, 813970121472

Offset

0,2

References

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

Links

Seiichi Manyama, Table of n, a(n) for n = 0..10000

Mathematica

terms = 18; s = EllipticTheta[3, 0, x]^16 + O[x]^(2 terms); Partition[ CoefficientList[s, x], 2][[All, 1]][[1 ;; terms]] (* Jean-François Alcover, Jul 06 2017 *)

Crossrefs

a(n) = A000152(2*n).

Sequence in context: A329536 A331768 A035314 * A107511 A288471 A008410

Adjacent sequences: A022044 A022045 A022046 * A022048 A022049 A022050

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Seiichi Manyama, Oct 16 2018

Status

approved