|
| |
|
| A108517号 |
| 数m，使得第一个m个自然数R_m（n）的置换=if（1<=n<m-pi（m），c（n），if（n=m，1，素数（n-m-pi=A002808号（k） ）。 |
|
2
|
|
|
|
1, 15, 33, 66, 85, 112, 125, 148, 213, 237, 321, 381, 466, 518, 585, 637, 956, 2127, 2571, 4255, 4884, 6686, 9193, 10412, 11073
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,2
|
|
|
评论
|
这个序列的所有24个已知项都是非素数。一般来说这是真的吗？
|
|
|
链接
|
|
|
|
例子
|
如果m>3&pi（m）=k，则n=1,2，。。。，m S_m（n）分别为
c（1），c（2），。。。，c（m-k-1），素数（1），素（2），。。。，素数（k），1。
33位于序列中，因为R_33=（1、4、9、16、26、11、20、32、31、29、19、30、23、3、8、15、25、7、14、24、5、10、18、18、28、17、27、13、22、2、6、12、21、33）是循环置换。
|
|
|
数学
|
（f[n_]：=（a=表[素数[k]，{k，素数Pi[n]}]；b=补码[范围[2，n]，a]；c=连接[b，a，{1}]）；d[n，m]：=f[n][[m]]；g[r]：=（v={1}；d[m]：=d[r，m]；对于[t=1，！成员Q[v，d[v[-1]]]&&t<r，v=附加[v，d[v[-1]]]；t++]；t）；执行[If[！PrimeQ[r]&&r=g[r]，打印[r]]，｛r，10800｝]）
|
|
|
交叉参考
|
|
|
|
关键字
|
更多,非n
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
