A145312 Coefficients in expansion of E''_4(q), where E_4 is the Eisenstein series in A004009.

4320, 40320, 210240, 604800, 1814400, 3467520, 7862400, 13080960, 24494400, 35164800, 64753920, 82293120, 135233280, 177811200, 269625600, 320785920, 500346720, 563068800, 838857600, 970905600, 1329229440, 1477681920, 2170022400, 2268144000, 3085992000

Offset

0,1

Links

Table of n, a(n) for n=0..24.

Mathematica

terms = 25;
E4[x_] = 1 + 240*Sum[k^3*x^k/(1 - x^k), {k, 1, terms+1}];
E4''[x] + O[x]^terms // CoefficientList[#, x]& (* Jean-François Alcover, Feb 27 2018 *)

Crossrefs

Cf. A004009, A145346.

Sequence in context: A055153 A190011 A338537 * A008409 A320729 A233641

Adjacent sequences: A145309 A145310 A145311 * A145313 A145314 A145315

Keyword

nonn

Author

N. J. A. Sloane, Feb 28 2009

Status

approved