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 A331778 #12 Feb 10 2020 22:04:07
%S A331778 1,1,3,1,90,90,567,5670,340200,113400,11226600,5613300,91945854000,
%T A331778 18389170800,137918781000,13135122000,562708626480000,11483849520000,
%U A331778 2020686677689680000,505171669422420000,3334133018187972000000,370459224243108000000,115027589127485034000000
%N A331778 Denominators of coefficients in asymptotic expansion of exp(2*(H_k-gamma))/k^2 in powers of 1/k, where H_k are the harmonic numbers A001008/A002805 and gamma is the Euler-Mascheroni constant A001620.
%H A331778 Chao-Ping Chen, <a href="http://dx.doi.org/10.1007/s11139-015-9670-3">On the coefficients of asymptotic expansion for the harmonic number by Ramanujan</a>, The Ramanujan Journal, 40:2 (2016), 279-290. See Eq. (2.11).
%t A331778 Denominator[CoefficientList[Series[Exp[2*(HarmonicNumber[k] - EulerGamma)]/k^2, {k, Infinity, 25}], 1/k]] (* _Vaclav Kotesovec_, Feb 10 2020 *)
%Y A331778 Numerators are in A331777.
%Y A331778 Cf. A001008, A001620, A002805, A093334, A238813.
%K A331778 nonn,frac
%O A331778 0,3
%A A331778 _N. J. A. Sloane_, Feb 09 2020
%E A331778 More terms from _Vaclav Kotesovec_, Feb 10 2020