%I#18 2019年3月15日12:33:57

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

%电话14,2,15,9,16,6,17,10,18,4,17,11,19,7,20,12,12,21,16,10,22,7,19,13,23，

%U 5,18,12,23,8,21,14,24,2,25,15,26,9,27,16,28,6,29,17,30,10,31,18,32,27,17,33,11,34,19,35,7,31,20,36,12,37,21,38,3,26,16,39,10,33,22

%N词汇学上最早的正序列，使得a（i）=a（j）=>A002487（i）=A002486（j）和A278222（i）=3278222（j），对于所有i，j>=0。

%C有序对的限制生长序列变换[A002487（n），A278222（n）]。

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

%H<a href=“/index/Bi#binary”>与n的二进制展开相关的序列的索引项</a>

%H<a href=“/index/St#Stern”>与Stern序列相关的序列的索引项</a>

%对于所有n>=0，F a（2^n）=2。

%o（PARI）

%o up_to=65537；

%o rgs_transform（invec）={my（om=Map（），outvec=vector（length（invec）），u=1）；对于（i=1，length（invec），if（mapisdefined（om，invec[i]），my（pp=mapget（om，invec[i]））；outvec[i]=outvec[pp]，mapput（om，invec[i]，i）；outvec[i]=u；u++）；outvec；}；

%o A002487（n）={my（a=1，b=0）；while（n>0，if（bitand（n，1），b+=a，a+=b）；n>>=1）；（b）；}；\\来自A002487

%o A005940（n）={my（p=2，t=1）；n--；直到（！n\=2，if（（n%2），（t*=p），p=下一素数（p+1））；t}；

%o A046523（n）={my（f=vecsort（factor（n）[，2]，4），p）；prod（i=1，#f，（p=nextprime（p+1））^f[i]）；}；\\来自A046523

%o A278222（n）=A046523（A005940（1+n））；

%o Aux323889（n）=[A002487（n），A278222（n）]；

%o v323889=rgs_transform（向量（1+up_to，n，Aux323889（n-1））；

%o A323889（n）=v323889[1+n]；

%Y参见A002487、A278222、A286622、A324400。

%Y另请参阅A103391、A278243、A286378、A318311、A323892、A323877和A324533，了解“变形变体”。

%K nonn，看

%0、2

%2019年2月9日，安提·卡图内