login
A015685
Expansion of e.g.f. theta_3^(-9/2).
2
1, -9, 99, -1287, 19089, -316305, 5772195, -114729615, 2462398785, -56674425465, 1390839617475, -36219350942775, 996780497137425, -28887911103276225, 878916406742849475, -27996927397669605375
OFFSET
0,2
REFERENCES
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 102.
LINKS
MATHEMATICA
nmax = 25; CoefficientList[Series[EllipticTheta[3, 0, x]^(-9/2), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Oct 23 2018 *)
CROSSREFS
Sequence in context: A245927 A233907 A294120 * A051581 A356100 A080291
KEYWORD
sign
STATUS
approved