%I #15 Oct 18 2018 08:51:12

%S 1,0,-196560,-16773120,38237799600,6589219553280,-7156481189457600,

%T -1928958160910376960,1281020641484922702000,496393397255370269491200,

%U -216626064507656630386166880,-118257112035536800684700160000

%N Expansion of reciprocal of theta series of Leech lattice.

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

%H Seiichi Manyama, <a href="/A001942/b001942.txt">Table of n, a(n) for n = 0..376</a>

%H G. Nebe and N. J. A. Sloane, <a href="http://www.math.rwth-aachen.de/~Gabriele.Nebe/LATTICES/Leech.html">Home page for lattice</a>

%H Eric Weisstein's World of Mathematics, <a href="http://mathworld.wolfram.com/LeechLattice.html">Leech Lattice.</a>

%t terms = 12; f[q_] = LatticeData["Leech", "ThetaSeriesFunction"][-I Log[q]/Pi]; s = Series[1/f[q], {q, 0, 2 terms}]; CoefficientList[s, q^2][[1 ;; terms]] // Round (* _Jean-François Alcover_, Jul 07 2017 *)

%Y Cf. A008408.

%K sign

%O 0,3

%A _N. J. A. Sloane_