login
A105095
Expansion of 8*eta(2*tau)^8/eta(tau)^16 + eta(tau/2)^8/eta(tau)^16.
1
1, 36, 402, 3064, 18351, 93300, 419150, 1708632, 6432867, 22659976, 75404754, 238825344, 724242492, 2113022844, 5954784540, 16263489048, 43168780485, 111630095424, 281807843656, 695783026296, 1682813702136, 3992563842088
OFFSET
0,2
LINKS
Borcherds, Richard E., Automorphic forms with singularities on Grassmannians, Invent. Math. 132 (1998), 491-562.
MATHEMATICA
max = 30; QP = QPochhammer; s = QP[q]^8/QP[q^2]^16 + O[q]^(2max+1); Table[ SeriesCoefficient[s, 2 n], {n, 0, max}] (* Jean-François Alcover, Nov 25 2015 *)
PROG
(PARI) {a(n)=local(A); if(n<0, 0, n*=2; A=x*O(x^n); polcoeff( eta(x+A)^8/eta(x^2+A)^16, n))} /* Michael Somos, Apr 09 2005 */
CROSSREFS
Sequence in context: A273229 A264361 A055862 * A027782 A179099 A181685
KEYWORD
nonn,easy
AUTHOR
N. J. A. Sloane, Apr 07 2005
EXTENSIONS
More terms from Michael Somos, Apr 07 2005
STATUS
approved