%I#2021年11月9日31日07:25:53

%S 11,9102,9,81,18,81,9913,9,81，18,81,9702,9171,27,72，18693,18,72，

%电话：27171,9702,9,81,18,81,98024,9,81，18,81,9702.9171,27,72,18693，

%U 18,72,27171,9702,9,81,18,81,95913,9,81，81,81,91602,9261单位

%N A030299的第一个差异。

%C摘自M.F.Hasler_，2013年1月12日：（开始）

%C注【2013年3月3日更新】：序列A030299的定义在2013年1月略有修改，因此，当A030299通过字典序排列的串联定义时，除了第一个A007489（9）-1=409112术语外，以下属性仍然有效，这在以前是不可能的，在元素>=10的情况下，这打破了良好的数学特性（特别是序列A219664=9*A217626的以下引用）。

%C这个取模9的序列为零，除了（可能）在A030299中排列结束的索引处。（这些指数由A0007489（n）给出，n>0。）在那里，它等于（mod 9）下一次运行的“n”。例如，a（1）=2（mod 9），A030299（1+1）=12是n=2运行的开始；a（3）=3（mod 9）和A030299（3+1）=123是n=3运行的开始，a（9）=4（mod九）和A030199（9+1）=1234是n=4运行的开始等。

%C这些指数（A007489（n）+1，。。。，A007489（n+1）-1），始终以相同的术语开头，如A219664=9*A217626（=A209280=A107346，其中定义了后者）中所列。（结束）

%H Antti Karttunen，n表，n=1..5912的a（n）</a>

%F a（n）=A030299（n+1）-A030299（n）。

%F a（n）=A219664（n-A007489（k）），对于A007486（k）<n<A007488（k+1）_M.F.Hasler，2013年1月13日

%e A030299启动（1、12、21、123、132、213、231、312…），其第一个差异产生（11、9、102、9、81、18、81…）。

%p（1->seq（l[j]-l[j-1]，j=2..nops（l））（[seq（map（x->parse（cat（x[]））），

%p组合[置换]（n））[]，n=0..5）]）[]；#_阿洛伊斯·海因茨，2021年11月9日

%o（方案）：（定义（A220664 n）（-（A030299（+1 n））（A030299n）））

%o（PARI）{A030299=concat（向量（5，k，vecsort（向量（（#k=向量（k，j，10^j）~\10）！，i，numtoperm（#k，i-1）*k）））；A220664=vecextract（A030299，“^1”）-vecexstract（A030299，“^-1”）}\\_M.F.Hasler_，2013年1月12日

%o（Python）

%o从itertools导入排列

%o定义pmap（s，m）：返回范围（1，len（s）+1）中i的总和（s[i-1]*10**（m-i））

%o定义代理（）：

%o m=1

%o为True时：

%o对于置换中的s（范围（1，m+1））：产生pmap（s，m）

%o m+=1

%o定义aupton（术语）：

%另外，g=[]，agen（）

%o t=下一个（g）

%o而len（alst）<术语：

%o t，prevt=下一个（g），t

%o alst+=[t-优先级]

%o返回alst

%o打印（aupton（65））#_Michael S.Branicky_，2021年11月9日

%Y重复部分由A219664给出，对于指数<5！，等于A107346！。

%K nonn，基础

%O 1,1号机组

%2012年12月17日，安提·卡图内