登录
词法上最早的无限序列,其中a(i)=a(j)=>f(i)=f(j),其中f(n)=[A007733号(n) ,A329697型(n) ,A331410型(n) ],对于所有i,j>=1。
4

%I#5 2020年8月11日10:38:44

%S 1,1,2,1,3,2,4,1,5,3,6,2,7,4,8,1,9,5,10,3,11,6,12,2,13,7,10,4,14,8,15,

%T 1,16,9,17,5,18,10,17,3,19,11,20,6,21,12,22,2,23,13,24,7,25,10,26,4,

%U 27,14,28,8,29,15,30,1,21,16,31,9,32,17,33,5,34,18,35,10,36,17,3,38,19,39,11,40,20,41,4,42,21,43,12,44,22,45,246,23,47,13

%N词法上最早的无限序列,使得a(i)=a(j)=>f(i)=f(j),其中f(N)=[A007733(N),A329697(N)和A331410(N)],对于所有i,j>=1。

%C有序对[A007733(n)、A329697(n)和A331410(n)]的三联体或同等物的限制生长序列变换。

%C对于所有i,j:A324400(i)=A324400。

%H Antti Karttunen,n表,n=1..65537的a(n)</a>

%o(PARI)

%o up_to=65537;

%o rgs_transform(invec)={my(om=Map(),outvec=vector(length(invec)),u=1);对于(i=1,长度(invesc),如果(mapisdefined(om,invec[i]),my(pp=mapget(om,invec[i];

%o A007733(n)=znorder(Mod(2,n/2^估值(n,2)));\\来自A007733

%o A329697(n)=如果(!位和(n,n-1),0,1+A329697-(n-(n/vecmax(因子(n)[,1])));

%o A331410(n)=如果(!位和(n,n-1),0,1+A331410(n+(n/vecmax(系数(n)[,1])));

%o Aux336936(n)=[A007733(n)、A329697(n)和A331410(n)];

%o v336936=rgs_transform(向量(up_to,n,Aux336936(n)));

%o A336936(n)=v336936【n】;

%Y参考A003602、A0007733、A329697、A331410、A335880。

%Y另请参阅A324400、A336920、A336933、A33693、A33694和A336935。

%K nonn公司

%氧1,3

%2020年8月11日,安蒂·卡图内