%I#30 2016年11月8日20:08:39

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

%电话：21,22,37,23,39,24,42,41,27,29,48,49,31,32,53,55,34,35,58,57,36,38,63，

%U 40、66、68、43、70、44、45、74、46、76、47、77、79、50、51、84、52、85、54、89、90、56、94、59、60、98、61100,62

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

%C y（n）见A275902。

%这是非负数的排列。

%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、A275899、A275900、A275902。

%K nonn公司

%O 0.3

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