%I #5 Feb 27 2018 10:23:37
%S 4320,40320,210240,604800,1814400,3467520,7862400,13080960,24494400,
%T 35164800,64753920,82293120,135233280,177811200,269625600,320785920,
%U 500346720,563068800,838857600,970905600,1329229440,1477681920,2170022400,2268144000,3085992000
%N Coefficients in expansion of E''_4(q), where E_4 is the Eisenstein series in A004009.
%t terms = 25;
%t E4[x_] = 1 + 240*Sum[k^3*x^k/(1 - x^k), {k, 1, terms+1}];
%t E4''[x] + O[x]^terms // CoefficientList[#, x]& (* _Jean-François Alcover_, Feb 27 2018 *)
%Y Cf. A004009, A145346.
%K nonn
%O 0,1
%A _N. J. A. Sloane_, Feb 28 2009