%I#9 2020年6月11日23:59:59

%S 1,2,3,4,5,6,8,7,9,10,12,11,14,15,16,18,13,20,21,22,24,25,17,26,28，

%电话：30,32,33,34,19,35,36,38,39,40,42,23,44,45,46,48,49,50,51,52,29,54,55，

%U 56、57、58、60、62、63、64、31、65、66、68、69、70、72、74、75、76、77、78、37、80、81、82、84、85、86、87、88、90、91、41

%N银逗号序列：素项指数的差异返回序列；正整数的最早的这种排列。

%H Eric Angelini，<a href=“https://cinquantesignes.blogspot.com/2020/05/yellow-commas-pink-red-blue.html“>黄色逗号、粉红色、红色、蓝色……</a>，blogspot.com上的个人博客“辛昆特签名”，2020年5月17日

%e素数项位于索引2、3、5、8、12、17、23、31、38、47、57、69、80、94…处。。。；第一个差异给出1、2、3、4、5、6、8、7、9、10、12、11、14…=序列本身。

%o（PARI）小于等于（N）={本地（U=[2]）；我的（a=Vec（[1,2]，N），i=1，L=2，nxt（p）=while（#U>1&U[2]==U[1]+1，U=U[^1]）；我（t=U[1]）；直到（如果（p，t=nextprime（t+1），！isprime（t+=1）））&&！setsearch（U，t），）；U=setunion（U，[t]）；t）；对于（N=3，N，a[N]=nxt（N-L==a[i]&i++&L=N）；a}

%Y参考A197756（黄色逗号序列：奇数项之间的数字计数）。

%K nonn公司

%O 1,2号机组

%A _Eric Angelini和M.F.Hasler，2020年5月19日