login
Theta series of D_16 lattice.
4

%I #15 Oct 16 2018 08:37:36

%S 1,480,29152,525952,3994080,18626112,67978880,197120256,509145568,

%T 1143441760,2428524096,4658843520,8705492608,15000919872,25593401600,

%U 40864033536,65187410400,98098623936,148724365664,213678303360,310833534528,430766443520,605650030464,813970121472

%N Theta series of D_16 lattice.

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

%H Seiichi Manyama, <a href="/A022047/b022047.txt">Table of n, a(n) for n = 0..10000</a>

%t 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 *)

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

%K nonn

%O 0,2

%A _N. J. A. Sloane_

%E More terms from _Seiichi Manyama_, Oct 16 2018