|
Search: id:A132979
|
|
|
| A132979 |
|
Expansion of psi(q^3) / psi(q)^3 in powers of q where psi() is a Ramanujan theta function. |
|
+0
2
|
|
| 1, -3, 6, -12, 24, -45, 78, -132, 222, -363, 576, -900, 1392, -2121, 3180, -4716, 6936, -10098, 14550, -20796, 29520, -41595, 58176, -80856, 111750, -153561, 209820, -285240, 385968, -519840, 696960, -930516, 1237470, -1639314, 2163456, -2845080, 3728904, -4871211
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
FORMULA
|
Expansion of eta(q)^3 * eta(q^6)^2 / ( eta(q^2)^6 * eta(q^3) ) in powers of q.
Euler transform of period 6 sequence [ -3, 3, -2, 3, -3, 2, ...].
G.f.: Product_{k>0} (1 + x^(3*k)) * (1 - x^(6*k)) / ( (1 + x^k) * (1 - x^(2*k)) )^3.
|
|
EXAMPLE
|
1 - 3*q + 6*q^2 - 12*q^3 + 24*q^4 - 45*q^5 + 78*q^6 - 132*q^7 + ...
|
|
PROGRAM
|
(PARI) {a(n) = local(A); if( n<0, 0, A = x * O(x^n); polcoeff( eta(x + A)^3 * eta(x^6 + A )^2 / ( eta(x^2 + A)^6 * eta(x^3 + A) ), n))}
|
|
CROSSREFS
|
(-1)^n * A132974(n) = a(n). Convolution invserse of A107760.
Sequence in context: A039695 A079079 A132974 this_sequence A018183 A137711 A068032
Adjacent sequences: A132976 A132977 A132978 this_sequence A132980 A132981 A132982
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Michael Somos, Sep 07 2007
|
|
|
Search completed in 0.002 seconds
|
