A022058 Theta series of D_27 lattice.

1, 1404, 280854, 19014840, 581257404, 9436118328, 93086496360, 638406025200, 3387901252374, 14765641285044, 55108831380408, 181434042582840, 538265644820280, 1464212332875816, 3696677780664960, 8759016189382896, 19620550996489404, 41872709357187696

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..1000

Mathematica

terms = 15; f[q_] = LatticeData["D27", "ThetaSeriesFunction"][-I*Log[q]/Pi]; s = f[q] + O[q]^(2 terms); DeleteCases[CoefficientList[s, q], 0][[1 ;; terms]] (* Jean-François Alcover, Jul 06 2017 *)

Crossrefs

Sequence in context: A271712 A352239 A206680 * A107522 A158764 A035863

Adjacent sequences: A022055 A022056 A022057 * A022059 A022060 A022061

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Seiichi Manyama, Oct 16 2018

Status

approved