login
A122268
Expansion of f(-q)^2*Q(q)^2 in powers of q.
0
1, 478, 60959, 925922, 5764801, 20722082, 54717118, 103864320, 173379838, 194669278, 214358881, 0, -92574720, -799067998, -815502237, -1959423842, -1300569598, -2939811840, 0, -2686875362, 3317297278, 0, 8406236160, 1662767518
OFFSET
0,2
COMMENTS
f(-q) (g.f. A010815) and Q(q) (g.f. A004009) are Ramanujan q-series.
PROG
(PARI) {a(n)=local(A); if(n<0, 0, A=x*O(x^n); polcoeff( eta(x+A)^2*sum(k=1, n, 240*sigma(k, 3)*x^k, 1+A)^2, n))}
CROSSREFS
Sequence in context: A260204 A119129 A252542 * A186950 A056987 A323051
KEYWORD
sign
AUTHOR
Michael Somos, Aug 28 2006
STATUS
approved