A282431 Coefficients in q-expansion of E_2^5, where E_2 is the Eisenstein series A006352.

1, -120, 5400, -104160, 511800, 6770736, -19504800, -452207040, -2959622280, -12932941080, -44497080432, -129918587040, -335811977760, -788655411600, -1714912983360, -3498061536576, -6761506680840, -12481939678320, -22138262633160, -37922739116640

Offset

0,2

Links

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

Mathematica

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

Crossrefs

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

Cf. A006352 (E_2), A281374 (E_2^2), A282018 (E_2^3), A282210 (E_2^4), this sequence (E_2^5).

Sequence in context: A126245 A221435 A229636 * A008661 A246216 A246284

Adjacent sequences: A282428 A282429 A282430 * A282432 A282433 A282434

Keyword

sign

Author

Seiichi Manyama, Feb 15 2017

Status

approved