%I #2 Apr 30 2014 01:37:09
%S 1,478,60959,925922,5764801,20722082,54717118,103864320,173379838,
%T 194669278,214358881,0,-92574720,-799067998,-815502237,-1959423842,
%U -1300569598,-2939811840,0,-2686875362,3317297278,0,8406236160,1662767518
%N Expansion of f(-q)^2*Q(q)^2 in powers of q.
%C f(-q) (g.f. A010815) and Q(q) (g.f. A004009) are Ramanujan q-series.
%o (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))}
%K sign
%O 0,2
%A _Michael Somos_, Aug 28 2006