|
Search: id:A146163
|
|
|
| A146163 |
|
Expansion of q^(-3/4) * eta(q^2)^2 * eta(q^20) / (eta(q)^2 * eta(q^4)) in powers of q. |
|
+0
3
|
|
| 1, 2, 3, 6, 10, 16, 25, 38, 57, 84, 121, 172, 243, 338, 465, 636, 862, 1158, 1546, 2050, 2701, 3540, 4613, 5980, 7719, 9916, 12682, 16158, 20506, 25926, 32667, 41022, 51348, 64080, 79730, 98922, 122407, 151068, 185968, 228384, 279816, 342052
(list; graph; listen)
|
|
|
OFFSET
|
0,2
|
|
|
FORMULA
|
Euler transform of period 20 sequence [ 2, 0, 2, 1, 2, 0, 2, 1, 2, 0, 2, 1, 2, 0, 2, 1, 2, 0, 2, 0, ...].
|
|
EXAMPLE
|
q^3 + 2*q^7 + 3*q^11 + 6*q^15 + 10*q^19 + 16*q^23 + 25*q^27 + 38*q^31 + ...
|
|
PROGRAM
|
(PARI) {a(n) = local(A); if( n<0, 0, A = x * O(x^n); polcoeff( eta(x^2 + A)^2 * eta(x^20 + A) / (eta(x + A)^2 * eta(x^4 + A)), n))}
|
|
CROSSREFS
|
A146162(4*n + 3) = a(n).
Sequence in context: A108062 A075623 A024801 this_sequence A101277 A023655 A023561
Adjacent sequences: A146160 A146161 A146162 this_sequence A146164 A146165 A146166
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Oct 27 2008
|
|
|
Search completed in 0.002 seconds
|
