STATUS
proposed
approved
proposed
approved
editing
proposed
terms = 13;
E4[x_] = 1 + 240*Sum[k^3*x^k/(1 - x^k), {k, 1, terms}];
E4[x]^7 + O[x]^terms // CoefficientList[#, x]& (* Jean-François Alcover, Feb 27 2018 *)
approved
editing
proposed
approved
editing
proposed
Seiichi Manyama, <a href="/A282402/b282402.txt">Table of n, a(n) for n = 0..1000</a>
approved
editing
reviewed
approved
proposed
reviewed
editing
proposed