%I#7 2015年12月6日23:23:10

%序号1,2,3,5,13,31,43251696124971

%N数m，使得前m个自然数T_m（N）=if（1<=N<=pi（m），素数（N），c（N-pi（m-1））的置换是循环置换，其中c（k）是第k个复合数，c（0）=1（对于每个自然数k，c（k-1）=A018252（k））。

%C对于n>1，a（n）是素数，因为如果m是一个复合数，那么T_m（m）=m，所以在这种情况下，T_m不能是循环置换。在素数（4420）之前没有其他项。-Farideh Firoozbakht，2005年6月29日

%e如果m>3&m=素数（k），则n=1,2，。..、m T_m（n）分别为素数（1）、素数（2）、，。..，素数（k），1,4，。..，m-1。

%e 31在序列中，因为T_31=（1、2、3、5、11、31、30、28、26、24、21、16、9、23、20、15、8、19、14、6、13、4、7、17、10、29、27、25、22、18、12）是循环置换。

%t f[n_]：=（a=表[素数[k]，{k，素数Pi[n]}]；b=补码[范围[n]，a]；c=连接[a，b]）；d[n，m]：=f[n][[m]]；g[r]：=（v={1}；d[m_]：=d[Prime[r]，m]；对于[t=1，！成员Q[v，d[v[-1]]]&&t<Prime[r]，v=Append[v，d[v[-1]]]；t++]；t）；w={1}；Do[If[Prime[r]==g[r]，w=附加[w，Prime[r]]；打印[w]]，{r，4420}]（Firoozbakht）

%Y参考A018252。

%Y参见A108516、A108517。

%K更多，nonn

%O 1,2号机组

%A Mehdi Khorrami（mymontain（AT）yahoo.com），2005年6月27日

%E更多条款来自_Farideh Firoozbakht，2005年6月29日