|
|
A282549
|
|
Coefficients in q-expansion of E_2*E_4^3, where E_2 and E_4 are respectively the Eisenstein series A006352 and A004009.
|
|
4
|
|
|
1, 696, 161928, 12599904, -22912728, -6132581424, -107015308128, -1012991092032, -6676225539480, -34225591158312, -145164618698832, -530958452207328, -1722320395791072, -5059903726594416, -13673185634909376, -34406198518205376, -81397333990275864
(list;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,2
|
|
LINKS
|
|
|
MATHEMATICA
|
terms = 17;
E2[x_] = 1 - 24*Sum[k*x^k/(1 - x^k), {k, 1, terms}];
E4[x_] = 1 + 240*Sum[k^3*x^k/(1 - x^k), {k, 1, terms}];
|
|
CROSSREFS
|
|
|
KEYWORD
|
sign
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|