%I#6 2020年8月6日06:01:30
%第1,1,1,1043599140687611165766863728011436881770074767723291页,
%电话:137560155520600195617494951186559,
%电话:260122627893213770028102613184254361777327032997817962934308492956500115058179262448159117567276656136
%N a(N)=(N!)^N*[x^N]exp(-Sum_{k>=1}(-x)^k/(k!)^N)。
%t表[(n!)^n系列系数[Exp[-Sum[(-x)^k/(k!)^n,{k,1,n}]],{x,0,n}],{n,0,10}]
%tb[n_,k_]:=b[n,k]=如果[n==0,1,-求和[(-1)^(n-j)二项式[n,j]^k(n-j)b[j,k],{j,0,n-1}]/n];a[n]:=b[n,n];表[a[n],{n,0,10}]
%Y参考A000587、A275044、A336209、A336210、A336439。
%K nonn公司
%0、4
%A _Ilya Gutkovskiy_,2020年8月5日
|