|
Search: id:A123649
|
|
|
| A123649 |
|
Expansion of eta(q)eta(q^12)^3/(eta(q^4)eta(q^3)^3) in powers of q. |
|
+0 1
|
|
| 1, -1, -1, 3, -2, -3, 8, -5, -7, 18, -12, -15, 38, -24, -30, 75, -46, -57, 140, -86, -104, 252, -152, -183, 439, -262, -313, 744, -442, -522, 1232, -725, -852, 1998, -1168, -1365, 3182, -1852, -2150, 4986, -2886, -3336, 7700, -4436, -5106, 11736, -6736, -7719, 17673, -10103, -11538, 26322
(list; graph; listen)
|
|
|
OFFSET
|
1,4
|
|
|
FORMULA
|
Euler transform of period 12 sequence [ -1, -1, 2, 0, -1, 2, -1, 0, 2, -1, -1, 0, ...].
G.f. A(x) satisfies 0=f(A(x), A(x^2)) where f(u, v)= u^2 -v*(1-2*(u+v)+4*u*v).
|
|
PROGRAM
|
(PARI) {a(n)=local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff( eta(x+A)*eta(x^12+A)^3/eta(x^3+A)^3/eta(x^4+A), n))}
|
|
CROSSREFS
|
Sequence in context: A071010 A073341 A070982 this_sequence A080848 A016602 A131134
Adjacent sequences: A123646 A123647 A123648 this_sequence A123650 A123651 A123652
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
Michael Somos, Oct 04 2006
|
|
|
Search completed in 0.002 seconds
|