|
Search: id:A134416
|
|
|
| A134416 |
|
Expansion of eta(q^4)^2 / (eta(q^2) * eta(q)^6) in powers of q. |
|
+0
2
|
|
| 1, 6, 28, 104, 342, 1016, 2808, 7296, 18044, 42750, 97656, 215992, 464360, 973176, 1993328, 3998592, 7870038, 15221232, 28968084, 54311736, 100421688, 183281904, 330468216, 589084288, 1038850488, 1813500030, 3135518440, 5372110496
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
FORMULA
|
Euler transform of period 4 sequence [ 6, 7, 6, 5, ...].
G.f.: Product_{k>0} (1 + x^k) * (1 + x^(2*k)) / (1 - x^k)^5.
|
|
EXAMPLE
|
1 + 6*q^4 + 28*q^8 + 104*q^12 + 342*q^16 + 1016*q^20 + 2808*q^24 + ...
|
|
PROGRAM
|
(PARI) {a(n) = local(A); if( n<0, 0, A = x * O(x^n); polcoeff( eta(x^4 + A)^2 / (eta(x^2 + A) * eta(x + A)^6), n))}
|
|
CROSSREFS
|
A134414(4*n) = -2 * a(n).
Adjacent sequences: A134413 A134414 A134415 this_sequence A134417 A134418 A134419
Sequence in context: A125310 A138874 A011856 this_sequence A117999 A028379 A098470
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Oct 26 2007
|
|
|
Search completed in 0.002 seconds
|
