%I#4 2020年9月24日14:00:08
%S 1,101052248624452390436116501777043659904514744959321,
%电话:44534554685004493090921151261521600149636044480,
%电话:68900819660071184149102595710688085061848017080543037723763185471253156880007001129064574027764370788231256983836207599153
%N a(0)=1;a(n)=(1/n)*Sum_{k=1..n}二项式(n,k)^2*k^4*a(n-k)。
%F和{n>=0}a(n)*x^n/(n!)^2=exp(x*(贝塞尔I(0,2*sqrt(x))+sqrt。
%F求和{n>=0}a(n)*x^n/(n!)^2=exp(求和{n>=1}n^3*x^n/(n)^2)。
%ta[0]=1;a[n]:=a[n]=(1/n)和[二项式[n,k]^2k^4a[n-k],{k,1,n}];表[a[n],{n,0,17}]
%t nmax=17;系数列表[Series[Exp[x(BesselI[0,2 Sqrt[x]]+Sqrt[x]BesselI[1,2 Sqrt[x]])],{x,0,nmax}],x]范围[0,nmax]^2
%Y参见A023998、A279358、A336227、A337591、A337825。
%K nonn公司
%O 0.3
%A _Ilya Gutkovskiy_,2020年9月24日
|