login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A008663
Theta series of direct sum of 2 copies of f.c.c. lattice.
1
1, 24, 156, 192, 636, 624, 1312, 1152, 2556, 1752, 4056, 2880, 5152, 4080, 7872, 4992, 10236, 6960, 11388, 8640, 16536, 9216, 19680, 12672, 20512, 15624, 26520, 15744, 30912, 20208, 34112, 23040
OFFSET
0,2
REFERENCES
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 113.
MATHEMATICA
terms = 32; s = 1/4 (EllipticTheta[3, 0, q]^3 + EllipticTheta[4, 0, q]^3)^2 + O[q]^(2 terms); CoefficientList[s, q^2] (* Jean-François Alcover, Jul 07 2017, from LatticeData(fcc) *)
CROSSREFS
Sequence in context: A092181 A001702 A004308 * A277984 A125334 A126492
KEYWORD
nonn,easy
AUTHOR
STATUS
approved