|
Search: id:A128663
|
|
|
| A128663 |
|
Expansion of eta(q^3)* eta(q^33)/( eta(q)* eta(q^11)) in powers of q. |
|
+0
1
|
|
| 1, 1, 2, 2, 4, 5, 7, 9, 13, 16, 22, 28, 37, 46, 59, 74, 94, 115, 144, 176, 218, 265, 326, 393, 479, 574, 695, 830, 996, 1184, 1414, 1673, 1988, 2344, 2770, 3254, 3828, 4482, 5252, 6126, 7153, 8318, 9678, 11222, 13018, 15050, 17405, 20068, 23145, 26621
(list; graph; listen)
|
|
|
OFFSET
|
1,3
|
|
|
FORMULA
|
G.f. A(x) satisfies 0=f(A(x), A(x^2)) where f(u, v)= (u-v^2)* (u^2-v) -2*u*v* (u+v+u*v).
G.f. A(x) satisfies 0=f(A(x), A(x^3)) where f(u, v)= v -u^3 +3*u*v* (2*u +(1+v)* (1 +3*u*v)).
G.f.: x* Product_{k>0} (1-x^(3k))* (1-x^(33k))/( (1-x^k)* (1-x^(11k))).
|
|
PROGRAM
|
(PARI) {a(n)= local(A); if(n<1, 0, n--; A=x*O(x^n); polcoeff( eta(x^3+A)* eta(x^33+A)/ eta(x+A)/ eta(x^11+A), n))}
|
|
CROSSREFS
|
Sequence in context: A058661 A094362 A000726 this_sequence A135833 A137200 A026930
Adjacent sequences: A128660 A128661 A128662 this_sequence A128664 A128665 A128666
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Mar 19 2007
|
|
|
Search completed in 0.002 seconds
|
