A124232-OEIS公司

A124232号

数字n使得素数（n）和π（n）是回文的。

1, 2, 3, 4, 5, 26, 32, 36, 138, 3691, 6987, 7193, 86969, 117766, 127150, 142583, 515786, 531448, 539596, 615980, 646060, 17262354, 39816443, 47548105, 48803361, 49426747, 528977302, 538348374, 1475057753, 1559827952, 2994135736, 60040412496, 64516992534, 333771325433, 11655934712628, 21872729899659, 22903935103276, 28311805106395, 29606335619415 (列表;图表;参考;听;历史;文本;内部格式)

	抵消	`1、2`
	链接	`n=1..39时的n，a（n）表。`
	数学	`下一个回文[n_]：=块[{lg=Floor@Log[10，n]+1，idn=整数位数@n}，如果[Union@idn=={9}，Return[n+2]，如果[lg<2，Return[n+1]，如果[CromDigits@Reverse@Take[idn，Ceiling[lg/2]>FromDigits@Take[idsn，-Ciling[1g/2]]，FromDiges@Join[Take[idn，Celing[lg/2]]，Reverse@Take[idn，Floor[lg/2]]，idfhn=FromDigs@Take[idsn，Celling[lg/m2]+1；idp=FromDigits@Join[IntegerDigits@idfhn，Drop[Reverse@IntegerDigits@idfhn，Mod[lg，2]]]]；` `palQ[n_Integer]：=模块[{idn=整数位数@n}，idn==反向[idn]；lst={}；k=1；当[k<10^12时，如果[底漆Q@k && palQ@PrimePi@PrimePi@k公司, 打印@PrimePi@k；附录[lst，PrimePi@k公司]]; k=下一个回文@k]; 第一次(罗伯特·威尔逊v)`
	交叉参考	`的后续A075807号=数字n，使得第n个素数是回文的。` `上下文中的序列：A088865型 A237342号 A075807号A051143号 A084853号 A115337号` `相邻序列：A124229号 A124230型 A124231号A124233号 112234英镑 A124235号`
	关键词	`基础,非n`
	作者	`塔尼亚·霍瓦诺娃2006年12月13日`
	扩展	`a（22）-a（31）来自罗伯特·威尔逊v2006年12月14日` `a（32）-a（33）来自多诺万·约翰逊2012年7月19日` `a（34）来自柴华武2019年9月12日` `a（35）-a（39）来自柴华武2019年9月19日`
	状态	`经核准的`

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新的seq。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人员OEIS基金会。

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

最后修改时间：美国东部时间2024年4月23日05:35。包含371906个序列。（在oeis4上运行。）