Location via proxy:   [ UP ]  
[Report a bug]   [Manage cookies]                
A022047
Theta series of D_16 lattice.
4
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
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
KEYWORD
nonn
EXTENSIONS
More terms from Seiichi Manyama, Oct 16 2018
STATUS
approved