|
|
A122269
|
|
Expansion of f(-q)^10*Q(q) in powers of q.
|
|
0
|
|
|
1, 230, -205, -6510, 18615, 478, 0, -181220, 221595, 246380, -329666, 360910, -1444915, 0, 2504645, 925922, -2420665, 0, 109940, -8382140, 5764801, 6217240, 13420615, -12214840, -17672945, 20722082, -24540725, 0, 0, 17018700, 54717118, -97990, -61107435
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
COMMENTS
|
|
|
LINKS
|
|
|
PROG
|
(PARI) {a(n)=local(A); if(n<0, 0, A=x*O(x^n); polcoeff( eta(x+A)^10*sum(k=1, n, 240*sigma(k, 3)*x^k, 1+A), n))}
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|