%I#9 2023年7月19日07:48:16

%S 1,1,1,8,1,1192,18,1,1,24,1,116384,1,36,1,40,1,11728,50,1，

%第2187,56,1,1,15242880,1,15184,1,1,14800,1,1,1,88,90,1,1442368页，

%U 98100,1104,18748,19408,1,1120,11126442450944,1,1136号

%N a（N）=Product_{p in Factors（N）}mult（p）*N^（mult（p）-1），其中Factors。

%F a（n）/A363919（n）=A005361（n）。

%F a（n）*A205959（n）=A005361（n）*A363923（n）=A363917（n）。

%pa:=n->局部p:mul（p[2]*n^（p[2]-1），ifactors（n）[2]中的p）：

%p序列（a（n），n=1..68）；

%o（PARI）a（n）=我的（f=系数（n）[，2]）；vecprod（f）*n^（vecsum（f）-#f）；\\_米歇尔·马库斯，2023年7月19日

%Y参见A363919、A363923、A005361、A205959、A303915、A363917。

%K nonn公司

%O 1,4型

%A _彼得·卢什尼，2023年7月19日