|
Search: id:A132217
|
|
|
| A132217 |
|
Expansion of psi(q^6)/ psi(-q) in powers of q where psi() is a Ramanujan theta functions. |
|
+0
1
|
|
| 1, 1, 1, 2, 3, 4, 6, 8, 11, 15, 19, 25, 33, 42, 53, 68, 86, 107, 134, 166, 205, 253, 309, 377, 460, 557, 672, 811, 974, 1166, 1394, 1661, 1975, 2344, 2773, 3275, 3863, 4543, 5333, 6253, 7316, 8544, 9964, 11600, 13484, 15653, 18140, 20994, 24269, 28011, 32288
(list; graph; listen)
|
|
|
OFFSET
|
0,4
|
|
|
FORMULA
|
Expansion of q^(-5/8)* eta(q^2)* eta(q^12)^2/( eta(q)* eta(q^4)* eta(q^6)) in powers of q.
Euler transform of period 12 sequence [ 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 1, 0, ...].
Product_{k>0} (1-x^(12*k))* (1-x^(2*k)+x^(4*k))/ (1-x^k).
|
|
PROGRAM
|
(PARI) {a(n)= local(A); if(n<0, 0, A= x*O(x^n); polcoeff( eta(x^2+A)* eta(x^12+A)^2/ eta(x+A)/ eta(x^4+A)/ eta(x^6+A), n))}
|
|
CROSSREFS
|
Adjacent sequences: A132214 A132215 A132216 this_sequence A132218 A132219 A132220
Sequence in context: A117995 A033834 A127419 this_sequence A039855 A035950 A133153
|
|
KEYWORD
|
nonn
|
|
AUTHOR
|
Michael Somos, Aug 13 2007
|
|
|
Search completed in 0.002 seconds
|
