|
%I #6 Jun 27 2013 05:42:31
%S 1,5,45,585,9961,210061,5289845,155026705,5186652945,195165726101,
%T 8161532936701,375619788842585,18871026734111865,1027821645714667805,
%U 60331977158792903621,3797171848203209305121,255100015925127615105825
%N E.g.f.: exp(1-(-2+3*(1-3*x)^(1/3))^(1/3)).
%F a(n) ~ n! * 3^(4*n)*exp(1)/(18^(2/3)*19^(n-1/3)*n^(4/3)*Gamma(2/3)) * (1-18^(1/3)*sqrt(3)*Gamma(2/3)^2*19^(1/3)/(12*Pi*n^(1/3))). - _Vaclav Kotesovec_, Jun 27 2013
%t CoefficientList[Series[E^(1-(-2+3*(1-3*x)^(1/3))^(1/3)), {x, 0, 20}], x]* Range[0, 20]! (* _Vaclav Kotesovec_, Jun 27 2013 *)
%Y Cf. A090135.
%K nonn
%O 1,2
%A _Karol A. Penson_, Nov 26 2003
|
