%我#17 2023年8月30日02:00:43

%S 1,3,7,29121747504140433362935362943339916801479006531，

%电话：622702080187178326609130767437148720922790212353355687428096001，

%电话：64023737090218111216451004088320012432902008212950169510909421717096913351124000727778046766849

%N a（N）=Sum_｛d|N｝（d-1）！*天^（n/d）。

%F G.F.：求和{k>0}k！*x^k/（1-k*x^k）。

%如果p是素数，a（p）=1+p！。

%t a[n_]：=除数和[n，（#-1）！*#^（n/#）&]；阵列[a，22]（*_Amiram Eldar_，2023年8月30日*）

%o（PARI）a（n）=汇总（n，d，（d-1）*d^（n/d））；

%o（PARI）my（N=30，x='x+o（'x^N））；Vec（总和（k=1，N，k！*x^k/（1-k*x^k））

%Y参见A038507、A062363、A078308、A217576、A321521、A358280。

%K nonn，简单

%O 1,2号机组

%2022年11月8日，A _Seiichi Manyama