%I#10 2017年11月13日02:46:34
%S 0,1,4,211481365159662294113932440784388868111784386810,
%电话:45565679511128979652482040065439945141354630932486118,
%电话:49512390012682395194511974480976529681728227537432878513365701965541248834520173610723750748520091679
%N例如:-LambertW(-x)/(1-x)。
%H G.C.Greubel,n表,n=0..385时的a(n)</a>
%对于n>0,a(n)=和{k=1..n}二项式(n,k)*k^(k-1)*(n-k)!。
%F a(n)~n^(n-1)/(1-exp(-1))。
%t系数列表[系列[-LambertW[-x]/(1-x),{x,0,20}],x]*范围[0,20]!
%t压扁[{0,Table[Sum[二项式[n,k]*k^(k-1)*(n-k)!,{k,1,n}],{n,1,20}]}]
%o(PARI)x='x+o('x^50);concat([0],Vec(serlaplace(-lambertw(-x)/(1-x)))\\_G.C.Greubel_,2017年11月12日
%Y参考A000169、A277511。
%K nonn公司
%0、3
%2016年10月18日,A _Vaclav Kotesovec_