%I#6 2020年8月11日10:38:20

%S 1,2,1,3,2,2,1,4,5,5,2,3,3,2,2,6,5,7,8,9,1,5,4,6,9,8,3,4,5,10,2,7，

%T 2,10,7,43,11,9,2,5,9,7,5,2,6,12,13,5,13,7,4,5,4,8,11,4,9,6,2,5,14,9，

%U 5,15,10,2,5,5,16,11,12,6,7,2,9,8,13,10,9,7,74,11,11,12,3,9,1,5,4,10,13,17,7,18,19,7,5,12,2

%N词法上最早的无限序列，使得a（i）=a（j）=>A335880（sigma（i。

%C有序对的函数f（n）=A335880（A000203（n））或同等函数的限制生长序列变换[A336928（n），A336929（n）]。

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

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

%o（PARI）

%o up_to=65537；

%o rgs_transform（invec）={my（om=Map（），outvec=vector（length（invec）），u=1）；对于（i=1，长度（invesc），如果（mapisdefined（om，invec[i]），my（pp=mapget（om，invec[i]；

%o A329697（n）={my（f=因子（n）；

%o A331410（n）={my（f=因子（n））；和（k=1，#f~，如果（2==f[k，1]，0，f[k、2]*（1+A331410（f[k），1]+1））；}；

%o Aux335880（n）=[A329697（n），A331410（n）]；

%o v336927=rgs_transform（向量（up_to，n，Aux335880（σ（n）））；

%o A336927（n）=v336927【n】；

%Y参见A000203、A335880、A336928和A336929。

%Y另请参阅A336926。

%K nonn公司

%O 1,2号机组

%2020年8月11日，安蒂·卡图内