登录
A115317号
a(n)=A115316号(A115316号(n) )。
2
1, 2, 6, 8, 4, 5, 10, 3, 12, 14, 9, 11, 16, 7, 18, 20, 15, 17, 22, 13, 24, 25, 21, 26, 23, 19, 27, 28, 29, 30, 31, 32, 33, 34, 36, 37, 35, 43, 41, 38, 42, 39, 40, 53, 47, 44, 61, 45, 46, 71, 48, 59, 57, 49, 50, 63, 51, 52, 89, 67, 54, 68, 55, 56, 74, 73, 58, 107, 60, 79, 113, 62
抵消
1,2
评论
的逆整数置换A115319号;
A115318号(a(n))=a(A115318号(n) )=A115316号(n) ●●●●。
数学
nmax=72;(*此序列的长度*)
nn=nmax+20(*估计长度A115316号-不足时应增加*);
np=天花板[nn/3]+1;
nc=天花板[(2/3)nn];
pp=素数[范围[np]];
cc=分区[Select[Range[FindRoot[n==nc+PrimePi[n]+1,{n,nc,2nc}][[1,2]]//Floor],CompositeQ],2];
A115316号=连接[{1},分格[pp,cc]//压扁][[1;;nn]];
a[n]:=A115316号[[A115316号[[n]]];
表[a[n],{n,1,nmax}](*让-弗朗索瓦·奥尔科弗2021年11月15日*)
关键词
非n
作者
状态
经核准的