OFFSET
0,2
REFERENCES
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 110.
MATHEMATICA
terms = 23; f[q_] = LatticeData["A10", "ThetaSeriesFunction"][-I Log[q]/Pi]; s = Normal[Series[f[q], {q, 0, 2 terms}]]; Partition[ CoefficientList[s, q] , 2][[All, 1]][[1 ;; terms]] // Round (* Jean-François Alcover, Jul 07 2017 *)
CROSSREFS
KEYWORD
nonn
AUTHOR
EXTENSIONS
More terms from Sean A. Irvine, Jun 12 2019
STATUS
approved