%I#34 2021年2月11日14:21:39

%S 0,2,3,2,5,0,7,2,30,0,11,0,13,0,0,2,17,0,19,0,0，0,2,23,0,5,0,12,29,0,31，

%温度2,0,0,0,10,37,0,0，0,041,0,43,0,,0,047,0,7,0,1,0,2,0,053,0,00,0,59,0,61,0，

%U 0,2,0,0,67,0,00,0,1,0,71,0,73,0,0，0,0_0,79,0,3,0,83,0,0.0,0,0.0,0_0,89,0,0-0,0.0

%具有多重性的N个素因子之和的N Mobius变换（A001414）。

%C与A014963相同，只是当n不是一次幂时，该函数为零，而A014963是一次幂。

%C此外，这个序列A014963、A297108和A297109将自然数划分为相同的等价类：对于所有i，j>=1，a（i）=a（j）<=>A014963（i）=A014963_Antti Karttunen，2021年2月1日

%H Reinhard Zumkeller，n的表，n=1..10000的a（n）</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/PrimeFactor.html“>主要因素</a>

%H Eric Weisstein的数学世界，<a href=“http://mathworld.wolfram.com/PrimeZetaFunction.html“>Prime Zeta函数</a>

%F如果n是素数幂p^k，k>0，a（n）=p；否则a（n）=0。

%F Dirichlet g.F.sum_{p素数}p/（p^s-1）=sum_{k>0}素数（ks-1）。

%F a（n）=A010055（n）*A007947（n）.-_Reinhard Zumkeller_，2010年3月26日

%F a（n）=A061397（A007947（n））_Reinhard Zumkeller，2011年9月19日，由Antti Karttunen更正，2021年1月31日

%F a（n）=总和{k=2..n}k*A010051（k）*（楼层（k^n/n）-楼层（（k^n-1）/n））.-_安东尼·布朗，2016年6月17日

%F如果A297109（n）=0，则a（n）=0，否则a（n_Antti Karttunen，2021年2月1日

%t表格[If[Length@#==1，#[[1，1]]，0]&@FactorInteger@n，{n，96}]/。1->0（*迈克尔·德弗里格，2016年6月19日*）

%t表[If[PrimePowerQ[n]，FactorInteger[n][[1,1]]，0]，{n，100}]（*_哈维P.戴尔，2020年1月25日*）

%o（哈斯克尔）

%o a120007 1=0

%o a120007 n |直到（>0）。（`mod`spf））（`div` spf）n==1=spf

%o |否则=0

%o其中spf=a020639 n

%o--_Reinhard Zumkeller_2011年9月19日

%o（PARI）A120007（n）={my（v）；if（i素数幂（n，&v），v，0）；}；\\_Antti Karttunen，2021年1月31日

%Y参见A000040、A001414、A007947、A014963、A010051、A010055、A061397、A070939、A140508（该序列的莫比乌斯变换）、A297108、A297109。

%K nonn公司

%O 1,2号机组

%A _弗兰克林·T·亚当斯-沃特斯，2006年6月2日