%I#14 2023年5月1日11:28:47
%S 1,1,-1,10,-27316,-372563666,-117768725196536,-607345209,
%电话16391726110,-488723923711596846353332,-566886190710853,
%电话:21733419523383946,电话:-89491099997666641539390009619800983536,电话:184560212678566290712191714859182521808208694
%N例如满足A(x)=exp(x^3+x/A(x))。
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/LambertW-Function.html“>Lambert W函数。
%F例如:x/LambertW(x*exp(-x^3))=exp(x^3+LambertW(x*exp(-x^2)))。
%F a(n)=n!*求和{k=0..floor(n/3)}(-n+3*k+1)^(n-2*k-1)/(k!*(n-3*k)!)。
%o(PARI)我的(N=20,x='x+o('x^N));Vec(塞拉普拉斯(exp(x^3+lambertw(x*exp(-x^3))))
%Y参见A362693、A362736。
%Y参考A362691。
%K符号
%0、4
%A _Seiichi Manyama,2023年5月1日
|