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 A038051 #17 Oct 31 2024 20:25:16
%S A038051 1,3,14,98,944,11642,175108,3108310,63601168,1473864722,38152990484,
%T A038051 1091172974102,34169139856024,1162736848398010,42723615842296540,
%U A038051 1685853467536076798,71101435046807892512,3191843270961299033762,151956292916451992949028
%N A038051 G.f.: B(x/(1-x)) where B is g.f. of A000169.
%H A038051 Vincenzo Librandi, <a href="/A038051/b038051.txt">Table of n, a(n) for n = 1..200</a>
%F A038051 E.g.f.: int(exp(x)*(-LambertW(-x)/(1+LambertW(-x))/x), x). a(n) = Sum_{k=0..n-1} binomial(n-1, k)*(k+1)^k. - _Vladeta Jovovic_, Apr 12 2003
%F A038051 a(n) ~ n^(n-1) * exp(exp(-1)). - _Vaclav Kotesovec_, Feb 17 2014
%t A038051 CoefficientList[Series[E^x*(-LambertW[-x]/(1+LambertW[-x])/x), {x, 0, 20}], x]* Range[0, 20]! (* _Vaclav Kotesovec_, Feb 17 2014 *)
%Y A038051 Cf. A036249, A038052.
%Y A038051 E.g.f. of A048802.
%K A038051 nonn
%O A038051 1,2
%A A038051 _Christian G. Bower_, Jan 04 1999
%E A038051 Corrected by _Christian G. Bower_, Mar 15 1999