login
A015683
Expansion of e.g.f. theta_3^(-5/2).
2
1, -5, 35, -315, 3345, -40845, 562275, -8575875, 143273025, -2598830325, 50790003075, -1062924352875, 23699584148625, -560468936152125, 14004884930911875, -368541883096261875, 10183347536828090625
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]^(-5/2), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Oct 23 2018 *)
CROSSREFS
Sequence in context: A371540 A225177 A151344 * A000357 A102147 A051577
KEYWORD
sign
STATUS
approved