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

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

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

Adjacent sequences: A015680 A015681 A015682 * A015684 A015685 A015686

Keyword

sign

Author

N. J. A. Sloane

Status

approved