%I#27 2016年11月8日20:08:54

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

%电话：34,36,22,38,23,40,25,27,44,47,29,31,50,52,32,33,55,57,35,37,59,62,39，

%U 65,41,42,69,43,71,73,45,75,46,77,49,48,81,83,51,85,53,88,54,56,91,58,95,97,60,99,61101单位

%N按照A275895中的连续反对偶，让第N个女王出现在方形（x（N），y（N））中；序列给出y（n）。

%C x（n）见A275901。

%这是非负数的排列。

%C这假定索引从0开始。如果分度从1开始，请参见A275899和A275900。

%H N.J.A.Sloane，N表，N=0..10386的A（N）</a>

%p见A275899。

%p#来自N.J.A.Sloane的替代枫树计划，2016年10月3日

%p#获取10000项A275902（xx）、A275901（yy）、A276783（ss）、-A276325（dd）

%p M1:=100000；M2:=22000；M3:=10000；

%p xx:=阵列（0..M1,0）；yy:=数组（0..M1,0）；ss：=阵列（0..M1,0）；dd:=数组（0..M1,0）；

%pxx[0]：=0；yy[0]：=0；ss[0]：=0；dd[0]：=0；

%p表示n从1到M2 do

%p开关：=-1；

%s从ss[n-1]+1到M2 do的p

%p代表i从0到s do

%px：=s-i；y： =i；

%p如果不是成员（x，xx，'p'）和

%p不是成员（y，yy，'p'）和

%p不是成员（x-y，dd，'p'），则sw:=1；断裂；fi；

%页码：#odi

%p如果sw=1，则断开；fi；

%页码：#od s

%p如果sw=-1，则lprint（“错误，n=”，n）；断裂；fi；

%pxx[n]：=x；yy[n]：=y；ss[n]：=x+y；dd[n]：=x-y；

%页码：#od n

%p[seq（xx[i]，i=0..M3）]：

%p[seq（yy[i]，i=0..M3）]：

%p[seq（ss[i]，i=0..M3）]：

%p[seq（dd[i]，i=0..M3）]：

%Y参见A065188、A275895、A27589、A275900、A275901。

%K nonn公司

%0、2

%A _N.J.A.Sloane，2016年8月24日