A023914 Theta series of A_23 lattice.

1, 552, 63756, 2704064, 53183682, 567173376, 3844954344, 19344711936, 78707396790, 270865553048, 819741312720, 2227781467584, 5559628500716, 12871144053504, 28053560345184, 57835101053184, 114001594899018

Offset

0,2

References

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

Links

Table of n, a(n) for n=0..16.

Mathematica

terms = 17; f[q_] = LatticeData["A23", "ThetaSeriesFunction"][-I*Log[q]/Pi]; s = f[q] + O[q]^(2 terms); Partition[CoefficientList[s, q] // Round, 2][[All, 1]][[1 ;; terms]] (* Jean-François Alcover, Jul 06 2017 *)

Crossrefs

Sequence in context: A189549 A282595 A290048 * A035849 A028686 A247531

Adjacent sequences: A023911 A023912 A023913 * A023915 A023916 A023917

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

More terms from Robert.Harley(AT)inria.fr, see A023902.

Status

approved