%I#14 2018年3月15日05:49:31

%S 0,1,2,3,4,5,6,13,20,27,34,41,40,39,38,37,36,29,22,15,16,17,18,25,24，

%电话23,30,31,32,33,26,19,12,11,10,9,8,7,14,21,28,35,42,43,44,45,46,47,48，

%电话：971461952442932929291290289288239190141142143144193192

%基于N Base-7的非负整数扭曲置换。

%Knuth的A220952的C Base-7变体，即两个数字a、b是相邻的iff，对于所有i>j，对（a_i、a_j）和（b_i、b_j）（其中索引表示Base-7数字：a=Sum_{k>=0}a_k*7^k）在下图中是相等的或相邻的：

%C、。

%C（0,6）--（1,6）--

%抄送|||

%抄送|||

%C（0,5）（1,5）--（2,5）--

%C|||||

%C|||||

%C（0,4）（1,4）（2,4）--（3,4）

%C||||||

%C||||||

%碳（0,3）（1,3）（2,3）（3,3）

%C||||||

%C||||||

%C（0,2）（1,2）（2,2）（3,2）-（4,2）（5,2）（6,2）

%C|||||

%C|||||

%C（0,1）（1,1）（2,1）--（3,1）--（4,1）-（5,1）

%抄送|||

%抄送|||

%C（0,0）（1,0）--（2,0）--

%C、。

%结果表明，对于任何正整数，都正好有另外两个相邻的非负整数，其中（a（n），a（n+1））是相邻整数对，定义了非负整数的置换。

%C对于一些n，基于3的模拟图将产生两个以上的其他相邻数字，例如，n=5将与3、4、6、7和8相邻。对于偶数基，此图没有精确的模拟。

%H M.F.Hasler，n表，n=0..1000时的a（n）</a>

%H<a href=“/index/Per#permutation”>与排列相关的索引条目</a>。

%o（PARI）是Adj（a，b）={a=Vec（数字（最小值（a，b），7），-#b=concat（0，数字（最大值（a、b），7&max（a[j]，b[j]）<6）||（a[i]==2&&！#setminus（集合（[a[j],b[j]]），[1,2,3,4]））||！#setminus（集合[a[j]，b[j]]），[2,3,4]）]，b[i]]），[1,2,3,4]））||（a[j]==4&&集（[a[i]，b[2]]）==[2,3]）||

%o u=[]；对于（n=a=0，100，打印1（a“，”）；u=集并（u，[a]）；而（#u>1&&u[2]==u[1]+1，u=u[^1]）；for（k=u[1]+1，oo，！setsearch（u，k）&&isAdj（a，k）&&（a=k）&&下一个（2））

%Y参见A220952（Knuth的原始base-5变体）、A300856（逆置换）、A30055（A220951的逆置换）。

%K nonn，基本，不错

%O 0.3

%A _M.F.Hasler，2018年3月13日