|
|
A289062
|
|
Coefficients in expansion of E_2^12/Product_{k>=1} (1-q^k)^24.
|
|
5
|
|
|
1, -264, 30564, -2012800, 81099090, -1952940672, 22697326712, 63468624384, -4486982088465, 11373493964160, 616923039055284, -663002527580928, -77516928995402226, -352040146340083200, 5929423960701095640, 87636971447313802240, 269600086946598203619
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
FORMULA
|
G.f.: Product_{k>=1} (1-q^k)^A288995(k).
|
|
EXAMPLE
|
G.f.: (1-q)^264 * (1-q^2)^4152 * (1-q^3)^77064 * ... = 1 - 264*q + 30564*q^2 - 2012800*q^3 + 81099090*q^4 - 1952940672*q^5 + ... .
|
|
MATHEMATICA
|
nmax = 20; CoefficientList[Series[(1 - 24*Sum[DivisorSigma[1, k]*x^k, {k, 1, nmax}])^12 / Product[(1 - x^k)^24, {k, 1, nmax}], {x, 0, nmax}], x] (* Vaclav Kotesovec, Jul 09 2017 *)
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|