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 A052142 #33 Feb 19 2025 11:56:53
%S A052142 1,1,5,49,697,12881,291901,7823425,241878449,8469678817,331194361141,
%T A052142 14301627569681,675802760007145,34681947121134769,1920727213363900397,
%U A052142 114166002761833118881,7248797582463164166241,489621781318487529974465
%N A052142 Expansion of e.g.f. exp(x/(1-4*x)^(1/2)).
%D A052142 R. P. Stanley, Enumerative Combinatorics, Cambridge, Vol. 2, 1999; see page 191.
%H A052142 Vladimir Kruchinin and D. V. Kruchinin, <a href="https://arxiv.org/abs/1103.2582">Composita and their properties</a>, arXiv:1103.2582 [math.CO], 2011-2013.
%F A052142 E.g.f.: exp(x/(1-4*x)^(1/2)).
%F A052142 a(n) = n!*sum((sum(2^k*k/(n-m)*binomial(2*(n-m)-k-1,n-m-1)*binomial(k+m-1,m-1),k,1,n-m))/m!,m,1,n-1)+1. - _Vladimir Kruchinin_, Sep 10 2010
%F A052142 Recurrence (for n>5): (n-5)*a(n) = 6*(2*n^2 - 13*n + 16)*a(n-1) - (48*n^3 - 432*n^2 + 1199*n - 1051)*a(n-2) + 2*(n-2)*(4*n-15)*(8*n^2 - 54*n + 89)*a(n-3) + 4*(n-4)*(n-3)*(n-2)*a(n-4). - _Vaclav Kotesovec_, Jun 27 2013
%F A052142 a(n) ~ n^(n-1/3)*exp(3*n^(1/3)/4-n)*4^n/sqrt(6). - _Vaclav Kotesovec_, Jun 27 2013
%F A052142 a(n) = n! * Sum_{k=0..n} 4^(n-k) * binomial(n-k/2-1,n-k)/k!. - _Seiichi Manyama_, Jan 30 2024
%t A052142 CoefficientList[Series[E^(x/(1-4*x)^(1/2)), {x, 0, 20}], x]* Range[0, 20]! (* _Vaclav Kotesovec_, Jun 27 2013 *)
%o A052142 (Maxima) a(n):=n!*sum((sum(2^k*k/(n-m)*binomial(2*(n-m)-k-1,n-m-1)*binomial(k+m-1,m-1),k,1,n-m))/m!,m,1,n-1)+1; /* _Vladimir Kruchinin_, Sep 10 2010 */
%o A052142 (PARI) my(N=20, x='x+O('x^N)); Vec(serlaplace(exp(x/sqrt(1-4*x)))) \\ _Joerg Arndt_, Jan 30 2024
%Y A052142 Cf. A362158.
%K A052142 nonn
%O A052142 0,3
%A A052142 _N. J. A. Sloane_, Jan 23 2000