%I#36 2015年5月13日15:55:22

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

%电话：21、36、25、41、22、39、30、48、27、46、29、49、31、52、37、59、33、56、40、64、35、60、38，

%U 65,42,68,43,71,44,73,45,75,51,82,47,79112,50,84,53,88,54,90,57,94,55,93,61100,58,98,62103,63105,67

%N a（1）=1。a（n）=对于任何具有2<=k<=n-1的k，不在前面出现的最小正整数，使得a（n，a（n-1）不等于a（k）-a（k-1）。

%这个序列是正整数的置换。

%Ca（n+1）-a（n）=A175499（n）。

%C猜想：相邻数的差异都不同的{1,2，…n}的字典序最早排列（参见A131529），对于n-->无穷大，这个序列作为其前缀_Joerg Arndt_，2012年5月27日

%H Joerg Arndt和Reinhard Zumkeller，n表，n=1..100000的a（n）

%H<a href=“/index/Per#IntegerPermutation”>自然数排列序列的索引项</a>

%t a[1]＝1；d[1]=0；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，d[k+1]=h，k=k+1}，{i，1，zz}]；

%t u=表[a[k]，{k，1，zz}]（*_Clark Kimberling_，2015年5月13日*）

%o（Python）

%o A175498_列表，l，s，b1，b2=[1,2]，2，3，set（），set（[1]）

%o表示范围（3，10**5）内的n：

%o。。。。i=秒

%o。。。。为True时：

%o。。。。。。。。如果不是（b1中的i或b2中的i-l）：

%o。。。。。。。。。。。。A175498_列表.追加（i）

%o。。。。。。。。。。。。b1.增加（i）

%o。。。。。。。。。。。。b2添加（i-l）

%o。。。。。。。。。。。。l=i

%o。。。。。。。。。。。。而b1中的s：

%o。。。。。。。。。。。。。。。。b1.删除

%o。。。。。。。。。。。。。。。。s+=1

%o。。。。。。。。。。。。打破

%o。。。。。。。。i+=1#_查瓦乌，2014年12月15日

%o（哈斯克尔）

%o导入数据。列表（删除）

%o a175498 n=a175498_列表！！（n-1）

%o a175498_list=1:f 1[2..][]其中

%o f x zs ds=g zs，其中

%o g（y:ys）|diff`elem`ds=gys

%o |否则=y:f y（删除y zs）（差异：ds）

%o其中diff=y-x

%o——Reinhard Zumkeller，2015年4月25日

%Y参见A081145、A175499、A257465（反向）、A257883、A131388、A13138、A257705。

%K nonn很好

%O 1,2号机组

%A _罗伊查询，2010年5月31日

%E更多条款，来自Sean A.Irvine_，2011年1月27日