[go: up one dir, main page]

login

Year-end appeal: Please make a donation to the OEIS Foundation to support ongoing development and maintenance of the OEIS. We are now in our 61st year, we have over 378,000 sequences, and we’ve reached 11,000 citations (which often say “discovered thanks to the OEIS”).

A015684
Expansion of e.g.f. theta_3^(-7/2).
2
1, -7, 63, -693, 8841, -127575, 2047815, -36081045, 690863985, -14263534215, 315469515375, -7434244696725, 185817177956025, -4906778826324375, 136422375634920375, -3981559981797523125, 121659806332798358625
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]^(-7/2), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Oct 23 2018 *)
CROSSREFS
Sequence in context: A368164 A345078 A233743 * A051579 A185106 A375175
KEYWORD
sign
STATUS
approved