|
| |
|
|
A001942
|
|
Expansion of reciprocal of theta series of Leech lattice.
|
|
1
|
|
|
|
1, 0, -196560, -16773120, 38237799600, 6589219553280, -7156481189457600, -1928958160910376960, 1281020641484922702000, 496393397255370269491200, -216626064507656630386166880, -118257112035536800684700160000
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
|
OFFSET
|
0,3
|
|
|
REFERENCES
|
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 135.
|
|
|
LINKS
|
|
|
|
MATHEMATICA
|
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 *)
|
|
|
CROSSREFS
|
|
|
|
KEYWORD
|
sign
|
|
|
AUTHOR
|
|
|
|
STATUS
|
approved
|
| |
|
|
