A282433 Coefficients in q-expansion of E_6^5, where E_6 is the Eisenstein series A013973.

1, -2520, 2457000, -1113204960, 199879986600, 4992350445936, -3054519828108000, -316433406335739840, -15444821445342229080, -469944493113793897080, -9973874479528786860432, -158211337782226162119840, -1972932224893221543809760

Offset: 0

Author

Seiichi Manyama, Feb 15 2017

Keywords

• sign

Links

• Seiichi Manyama, Table of n, a(n) for n = 0..1000

Crossrefs

Cf. A282431 (E_2^5), A282015 (E_4^5), this sequence (E_6^5).

Cf. A013973 (E_6), A280869 (E_6^2), A282253 (E_6^3), A282331 (E_6^4), this sequence (E_6^5).

Programs

Mathematica

terms = 13;
E6[x_] = 1 - 504*Sum[k^5*x^k/(1 - x^k), {k, 1, terms}];
E6[x]^5 + O[x]^terms // CoefficientList[#, x]& (* Jean-François Alcover, Feb 27 2018 *)