登录
OEIS基金会得到了OEIS用户的捐赠和西蒙斯基金会的资助。

 

标志

请做一个捐赠让OEIS继续运行。我们现在已经56岁了。在过去的一年里,我们增加了10000个新序列,达到了近9000个引用(通常说“感谢OEI的发现”)。
其他方式捐赠

提示
(问候来自整数序列在线百科全书!)
A108515电话 数m使得第一个m自然数T峎m(n)=如果(1<=n<=pi(m),素数(n),c(n-pi(m)-1))是循环置换,其中c(k)是第k个复合数,c(0)=1(对于每个自然数k,c(k-1)=A018252号(k) )。 2
1、2、3、5、13、31、43、251、6961、24971 (列表;图表;参考文献;;历史;文本;内部格式)
抵消

1,2

评论

对于n>1,a(n)是素数,因为如果m是一个复合数,那么T峎m(m)=m,所以在这种情况下T峎m不能是循环置换。还有第44项到第20项。-法里德·菲鲁兹巴赫特2005年6月29日

链接

n=1..10的n,a(n)表。

例子

如果m>3&m=prime(k),那么对于n=1,2,…,m T ium(n)分别是素数(1),素数(2),…,素数(k),1,4,…,m-1。

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)是一个循环置换。

数学

f[n_u]:=(a=表[Prime[k],{k,PrimePi[n]}];b=补码[Range[n],a];c=Join[a,b]);d[n_u,m_9]:=f[n][[m]];g[r_u]:=(v={1};d[mü]:=d[Prime[r],m];对于[t=1!MemberQ[v,d[v[[-1]]]&&t<Prime[r],v=Append[v,d[v[-1]]]];t++];t);w={1};Do[If[Prime[r]==g[r],w=Append[w,Prime[r]];Print[w]],{r,4420}](Firoozbakht)

交叉引用

囊性纤维变性。A018252号.

囊性纤维变性。A108516号,A108517电话.

上下文顺序:A324375型 A038879号 邮编:A162390*A167495号 A041519型 A060434号

相邻序列:A108512 A108513电话 A108514电话*A108516号 A108517电话 A108518电话

关键字

更多,

作者

Mehdi Khorrami(mymontain(AT)yahoo.com),2005年6月27日

扩展

更多条款来自法里德·菲鲁兹巴赫特2005年6月29日

状态

经核准的

查找|欢迎光临|维基|登记|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索者|最近
OEIS社区|维护人OEIS基金公司。

许可协议,使用条款,隐私政策。.

上次修改日期:美国东部时间2020年11月25日11:32。包含338623个序列。(运行在oeis4上。)