A015669 Expansion of e.g.f. theta_3^(9/2).
1, 9, 63, 315, 1161, 8505, 112455, 796635, 2843505, 57661065, 1099313775, 9327901275, 92211082425, 1678394943225, 32985192014775, 598006256722875, 4499525524118625, 75554867738975625, 4316991655250649375
Offset: 0
Keywords
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..448
Programs
-
Mathematica
nmax = 25; CoefficientList[Series[EllipticTheta[3, 0, x]^(9/2), {x, 0, nmax}], x] * Range[0, nmax]! (* Vaclav Kotesovec, Oct 23 2018 *)