登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A249377号 素数Q,使得串联Q,4,Q是素数。 3
11, 17, 29, 53, 71, 107, 113, 179, 239, 263, 293, 317, 347, 401, 419, 503, 557, 569, 641, 659, 809, 857, 863, 941, 953, 983, 1049, 1103, 1277, 1301, 1319, 1439, 1487, 1553, 1613, 1667, 1733, 1877, 1889, 1901, 1907, 1949, 2243, 2381, 2447, 2477, 2687, 2693 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
例子
343为复合,545为复合,747为复合,11411为素数,因此a(1)=11。
数学
选择[Prime[Range[300]]、PrimeQ[FromDigits[Join[IntegerDigits[#]、{4}、IntegerPigits[#]]&](*哈维·P·戴尔,2016年8月1日*)
黄体脂酮素
(PFGW和SCRIPT),带有前10000000个质数的pre10.txt文件。
脚本
尺寸i,0
尺寸j
仪表板集成模块k
尺寸n,1
打开文件myf,a(n).txt
OPENFILEIN maf,pre10.txt版
GETNEXT j,马夫
标签回路1
GETNEXT j,马夫
如果j>10^n,则设置n,n+1
设置k,j*10^(n+1)+4*10^ n+j
项目需求计划k
如果ISPRP,则转到w
转到循环1
标签w
设置i,i+1
写入myf,j
如果i>9999,则结束
转到循环1
(PARI)列表a(nn)={表示素数(p=1,nn,if(isprime(eval(concat(Str(p),4),Str(p))),print1(p,“,”););}\\米歇尔·马库斯2014年10月27日
(Magma)[p:p in PrimesUpTo(3000)|IsPrime(Seqint(Intseq(p)cat[4]cat Intseq(p)))]//文森佐·利班迪2014年10月27日
(Python)
从sympy导入isprime,primerange
定义正常(p):s=str(p);返回isprime(int(s+“4”+s))
def aupto(limit):返回[p代表素数范围内的p(1,limit+1)if ok(p)]
打印(aupto(2700))#迈克尔·布拉尼基2021年11月17日
交叉参考
参见中列出的类似序列A249374号.
关键词
非n,基础
作者
皮埃尔·卡米2014年10月27日
状态
已批准

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

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

最后修改时间:美国东部时间2024年4月24日19:24。包含371962个序列。(在oeis4上运行。)