%I#9 2015年6月9日14:21:52

%S 0,1,4,2,6,3,8,7,13,5,12,20,9,18,11,15,10,22,33,14,27,17,31,16,32，

%电话：19,34,25,42,24,43,23,41,29,49,26,47,30,52,28,51,35,59,37,62,36,63,38，

%U 64,50,46,74,39,68,40,70101,44,76,45,78,48,82,53,88,54

%由算法（注释中）生成的N序列（a（N）），a（1）=0，d（1）=2。

%C算法：对于k>=1，设A（k）={A（1），…，A（k）}和D（k）={D（1）…，D（k）{。从k=1和非负整数a（1）和d（1）开始。设h为最小整数>-a（k），使得h不在D（k）中，a（k）+h不在a（k）内。设a（k+1）=a（k）+h和d（k+1。

%C猜想：如果a（1）是非负整数，d（1）是整数，则（a（n））是非负整数的置换（如果a（1）=0）或正整数的置换（如果a（1）>0）。此外，如果d（1）=0，则（d（n））是整数的置换；如果d（l）>0，则是非零整数的置换。

%C相关序列指南见A257883。

%H Clark Kimberling，n的表，n=1..1000的a（n）</a>

%对于k>=1，F a（k+1）-a（k）=d（k+1。

%e a（1）=0，d（1）=2；

%e a（2）=1，d（2）=1；

%e a（3）=4，d（3）=3；

%e a（4）=2，d（4）=-2。

%ta[1]=0；d[1]=2；k=1；z=10000；zz=120；

%tA[k_]：=表[A[i]，{i，1，k}]；diff[k_]：=表[d[i]，{i，1，k}]；

%t c[k_]：=补码[Range[-z，z]，diff[k]]；

%t t[k_]：=-a[k]+补码[范围[z]，a[k]]

%t表[{h=Min[交集[c[k]，t[k]]]，a[k+1]=a[k]+h，

%td[k+1]=h，k=k+1}，{i，1，zz}]；

%t u=表格[a[k]，{k，1，zz}]（*A257885*）

%t表格[d[k]，{k，1，zz}]（*A257902*）

%Y参见A257902、A257883、A257705。

%K nonn，简单

%O 1,3

%A_Clark Kimberling_，2015年5月13日