This is a front-end for the Online Encyclopedia of Integer Sequences, made by Christian Perfect. The idea is to provide OEIS entries in non-ancient HTML, and then to think about how they're presented visually. The source code is on GitHub.
%I A058552 #15 Feb 27 2018 10:53:09
%S A058552 1,16320,534790080,234174178560,17524001357760,498046875016320,
%T A058552 7673653657232640,77480203842286080,574226476491096000,
%U A058552 3360143509958850240,16320498047409790080,68172690124863440640,251450283274373326080
%N A058552 Numerators of q-expansion of Eisenstein series E_16(q).
%C A058552 Denominators are 3617 except for leading term for which denominator is 1.
%D A058552 R. C. Gunning, Lectures on Modular Forms. Princeton Univ. Press, Princeton, NJ, 1962, p. 53.
%D A058552 N. Koblitz, Introduction to Elliptic Curves and Modular Forms, Springer-Verlag, 1984, see p. 111.
%H A058552 <a href="/index/Ed#Eisen">Index entries for sequences related to Eisenstein series</a>
%p A058552 E := proc(k) local n,t1; t1 := 1-(2*k/bernoulli(k))*add(sigma[k-1](n)*q^n,n=1..60); series(t1,q,60); end; E(16);
%t A058552 terms = 13; E16[x_] = 1 - (32/BernoulliB[16])*Sum[k^15*(x^k/(1 - x^k)), {k, 1, terms}]; E16[x] + O[x]^terms // CoefficientList[#, x]& // Numerator (* _Jean-François Alcover_, Feb 27 2018 *)
%Y A058552 Cf. A029829.
%K A058552 nonn,frac
%O A058552 0,2
%A A058552 _N. J. A. Sloane_, Dec 25 2000