A022059 Theta series of D_28 lattice.

1, 1512, 327656, 24189984, 811401192, 14500933104, 156797510688, 1163495873088, 6597606440936, 30505974273096, 119983597365744, 414352982942304, 1283861585339424, 3635198568784944, 9523977599887936, 23358459198626496, 54039921152557032, 118876818364991568

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["D28", "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: A037150 A276291 A034601 * A134614 A134613 A187294

Adjacent sequences: A022056 A022057 A022058 * A022060 A022061 A022062

Keyword

nonn

Author

N. J. A. Sloane

Extensions

More terms from Seiichi Manyama, Oct 16 2018

Status

approved