|
%I #8 Nov 17 2015 05:33:44
%S 1,1,3,14,94,842,9519,130482,2105618,39124431,822878381,19327882796,
%T 501494558195,14245978068064,439754047318837,14657503897927947,
%U 524655050276784041,20072230656725277199,817381577168986757486
%N E.g.f.: exp(1-sqrt(3-2*exp(x))).
%F a(n) ~ sqrt(3/2)*n^(n-1)/(exp(n-1)*(log(3/2))^(n-1/2)). - _Vaclav Kotesovec_, Jun 27 2013
%t CoefficientList[Series[E^(1-Sqrt[3-2*E^x]), {x, 0, 20}], x]* Range[0, 20]! (* _Vaclav Kotesovec_, Jun 27 2013 *)
%K nonn
%O 0,3
%A _Karol A. Penson_, Feb 10 2004
%E Prepended a(0)=1 from _Vaclav Kotesovec_, Nov 17 2015
|
