A015685 Expansion of e.g.f. theta_3^(-9/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

Seiichi Manyama, Table of n, a(n) for n = 0..429

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

Adjacent sequences: A015682 A015683 A015684 * A015686 A015687 A015688

Keyword

sign

Author

N. J. A. Sloane

Status

approved