Reminder: The OEIS is hiring a new managing editor, and the application deadline is January 26.
%I #13 Oct 23 2018 08:14:49
%S 1,-9,99,-1287,19089,-316305,5772195,-114729615,2462398785,
%T -56674425465,1390839617475,-36219350942775,996780497137425,
%U -28887911103276225,878916406742849475,-27996927397669605375
%N Expansion of e.g.f. theta_3^(-9/2).
%D J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 102.
%H Seiichi Manyama, <a href="/A015685/b015685.txt">Table of n, a(n) for n = 0..429</a>
%t nmax = 25; CoefficientList[Series[EllipticTheta[3, 0, x]^(-9/2), {x, 0, nmax}], x] * Range[0, nmax]! (* _Vaclav Kotesovec_, Oct 23 2018 *)
%K sign
%O 0,2
%A _N. J. A. Sloane_