%I#15 2022年8月17日02:42:32
%S 1,7,7418968382961699156344445868979613008816407420884385,
%电话:37924523633453831076168167972120354368657061467873013440,
%电话:14978733444001153726777126278379183194681027789939228224120114488162020163762
%N a(N)=N!*求和{k=1..n}σ_k(k)/(k*(n-k)!)。
%例如:-exp(x)*Sum_{k>0}log(1-(k*x)^k)/k。
%F a(n)~n!*n ^(n-1).-_瓦茨拉夫·科特索维奇,2022年8月17日
%t a[n]:=n!*求和[DivisorSigma[k,k]/(k*(n-k)!),{k,1,n}];阵列[a,15](*_Amiram Eldar_,2022年8月14日*)
%o(PARI)a(n)=n*总和(k=1,n,σ(k,k)/(k*(n-k)!));
%o(PARI)我的(N=20,x='x+o('x^N));Vec(serlaplace(-exp(x)*总和(k=1,N,log(1-(k*x)^k)/k))
%Y参见A002745、A002746、A356437、A356590。
%K nonn公司
%O 1,2号机组
%A _Seiichi Manyama,2022年8月14日
|