%我#41 2024年1月29日08:59:47

%S 1,0,2,1121408022320395654481186561881856804871980800，

%电话：13934217814043632912660481484706516599285455056815237120，

%电话：215238256785814500907704776843575296044961107369632553619396232794530858944649760253036425594903980

%N膨胀，例如：A（x）=1/（1-LambertW（-x）^2）。

%C E.g.f.等于A060435的E.g.f.的平方，其中A060436（n）=函数f:{1,2，…，n}->{1,2…，n{仅具有偶数个循环。

%H Vincenzo Librandi，<a href=“/A134095/b134095.txt”>n的表，a（n）表示n=0..200</a>

%F a（n）=和{k=0..n}C（n，k）*（n-k）^k*k^（n-k。

%F a（n）=n*求和{k=0..n}（-1）^（n-k）*n^k/k！.-_Vladeta Jovovic_，2007年10月17日

%传真（n）~n^n/2.-_Vaclav Kotesovec_，2012年11月27日，简化后的2021年11月22日

%F a（n）=n！*[x^n]扩展（n*x）/（1+x）.-_伊利亚·古特科夫斯基，2018年9月18日

%F a（n）=（-1）^n*exp（-n）*Integral_{x=-n..oo}x^n*exp（-x）dx.-_托马斯·谢尔勒，2024年1月29日

%例如：A（x）=1+0*x+2*x^2/2！+12*x^3/3！+120*x^4/4！+1480*x^5/5！+。。。

%e公式A（x）=1/（1-LambertW（-x）^2）表示为：

%e A（x）=1/（1-（x+x^2+3^2*x^3/3！+4^3*x^4/4！+5^4*x^5/5！+…）^2）。

%p序列（简化（GAMMA（n+1，-n）*（-exp（-1））^n），n=0..20）；#_Vladeta Jovovic_，2007年10月17日

%t系数列表[级数[1/（1-LambertW[-x]^2），{x，0，20}]，x]*范围[0，20]！（*_Vaclav Kotesovec_，2012年11月27日*）

%t a[x0_]：=x D[1/x扩展[x]，{x，n}]x^n扩展[-x]/。x->x0

%t表[a[n]，{n，0，20}]（*_Gerry Martens_，2016年5月5日*）

%o（PARI）{a（n）=和（k=0，n，（n-k）^k*k^（n-k

%o（PARI）/*由例如f.1/（1-LambertW（-x）^2）生成：*/

%o{a（n）=我的（LambertW=-x*和（k=0，n，（-x）^k*（k+1）^（k-1）/k！）+x*o（x^n））

%Y参考A060435；间接相关：A062817，A132608。

%Y参见A063170、A277458、A277490、A277510。

%K nonn公司

%0、3

%A·保罗·D·汉纳，2007年10月11日