%I#14 2020年9月23日03:22:00

%S 1,3,7,4,15,12,31,6,13,28,63,18127,60,39,8255,24511,42,911241023，

%电话：24,40252,31,902047,724095,12195508120,3281911020403,56，

%电话：1638316832767186,93204465535,36121,78819378131071,482801206514092262143,965242878188217,1460036010485757623315234

%N共轭素因式分解计算的除数之和：a（N）=A000203（A122111（N））。

%H Antti Karttunen，n的表，n=1..4096的a（n）</a>

%H<a href=“/index/Pri#prime_indices”>根据素数分解中的索引计算的序列的索引条目</a>

%H<a href=“/index/Si#SIGMAN”>与sigma（n）相关序列的索引条目</a>

%F a（n）=A000203（A122111（n））。

%F a（n）=2*A122111（n）-A323174（n）。

%F a（n）=A322819（n）*A038712（A122111（n））。

%t A122111[n_]：=乘积[Prime[Sum[If[j<i，0，1]，{j，#}]]，{i，Max[#]}]&[Flatten[Table[PrimePi[f[[1]]]，}]，{f，FactorInteger[n]}]]；

%t a[n_]：=使用[{k=A122111[n]}，除数Sigma[1，k]]；

%t阵列[a，70]（*_Jean-François Alcover_，2020年9月23日*）

%o（PARI）

%o A064989（n）={my（f）；f=因子（n）；如果（n>1&&f[1,1]==2），f[1,2]=0）；对于（i=1，#f~，f[i，1]=前一素数（f[i、1]-1））；因子回退（f）}；

%o A122111（n）=如果（1==n，n，素数（bigomega（n））*A122111；

%o A323173（n）=西格玛（A122111（n））；

%Y参见A000203、A038712、A122111、A322819、A323174。

%Y另请参阅A323243。

%K nonn公司

%O 1,2号机组

%2019年1月10日，安提·卡图宁