|
Search: id:A113977
|
|
|
| A113977 |
|
Expansion of (eta(q)^3*eta(q^10)^6)/(eta(q^2)^2*eta(q^5)^7) in powers of q. |
|
+0 1
|
|
| 1, -3, 2, -1, 5, 2, -18, 9, -1, 25, 4, -74, 36, -2, 90, 7, -240, 115, -4, 275, 12, -684, 318, -6, 745, 20, -1772, 810, -10, 1850, 32, -4263, 1928, -16, 4310, 49, -9684, 4332, -24, 9525, 74, -20980, 9306, -36, 20155, 110, -43674, 19238, -53, 41125, 160, -87876, 38460, -76, 81300, 230
(list; graph; listen)
|
|
|
OFFSET
|
1,2
|
|
|
REFERENCES
|
N. J. Fine, Basic Hypergeometric Series and Applications, Amer. Math. Soc., 1988; p. 110, Eq. (40.49).
|
|
FORMULA
|
Euler transform of period 10 sequence [ -3, -1, -3, -1, 4, -1, -3, -1, -3, 0, ...].
G.f.: x(Product_{k>0} (1+x^(5k))^6*(1-x^k)/ ((1+x^k)^2*(1-x^(5k)))).
|
|
PROGRAM
|
(PARI) {a(n)=local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff( eta(x+A)^3*eta(x^10+A)^6/ eta(x^2+A)^2/eta(x^5+A)^7, n))}
|
|
CROSSREFS
|
Adjacent sequences: A113974 A113975 A113976 this_sequence A113978 A113979 A113980
Sequence in context: A028412 A077819 A030313 this_sequence A019587 A102427 A080883
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Michael Somos, Nov 10 2005
|
|
|
Search completed in 0.002 seconds
|