OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由支持OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
搜索: a339698-编号:a339688
显示找到的2个结果中的1-2个。 第页1
    排序:相关性|参考文献||被改进的|创建     格式:长的|短的|数据
A339920型 素数p,使得p^2-p*q+q^2是素数,其中q是p之后的下一个素数。 +10
2, 3, 53, 151, 167, 263, 373, 443, 467, 509, 523, 571, 1063, 1103, 1117, 1217, 1493, 1553, 1901, 1973, 2161, 2207, 2281, 2399, 2713, 2837, 2963, 3259, 3347, 3511, 4073, 4297, 4373, 4463, 4523, 4673, 4691, 4877, 5147, 5237, 5303, 5419, 5471, 5851, 6211, 6311, 6367 (列表图表参考历史文本内部格式)
抵消
1,1
评论
发件人伯纳德·肖特2020年12月23日:(开始)
除a(2)=3外,(3,5)给出A339698(2) =19,没有其他双素数对(p,p+2)(p inA001359号)它给出了形式为p^2-p*q+q^2=p^2+2p+4的质数。
没有连续的近亲素数(p,p+4)(p inA029710号)它给出了形式为p^2-pq+q^2=p^2+4p+16的质数。
没有间隔为8(p,p+8)(p in)的连续素数A031926号)给出了形式为p^2-pq+q^2=p^2+8p+64的质数。(结束)
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
MAPLE公司
q: =2:计数:=0:R:=NULL:
当计数<100 do时
p: =q;q: =下一次价格(q);
如果是素数(p^2-p*q+q^2),则
计数:=计数+1;R: =R,p;
fi(菲涅耳)
日期:
R#罗伯特·伊斯雷尔2020年12月24日
程序
(PARI)表示素数(p=1,1e4,my(q=nextprime(p+1));如果(ispseudoprime(p^2-p*q+q^2),打印1(p,“,”));
交叉参考
囊性纤维变性。A339698型.
关键词
非n
作者
米歇尔·马库斯2020年12月23日
状态
经核准的
A342706型 形式为(p^2-p*q+q^2)/3的素数,其中p和q是连续素数。 +10
2
13, 31, 79, 109, 151, 1201, 3271, 3469, 3889, 4111, 12289, 16879, 17791, 25951, 27673, 108301, 126079, 134857, 138679, 169957, 174259, 186019, 231877, 245389, 259309, 355009, 367501, 371737, 397489, 412939, 461017, 477619, 524197, 544429, 565069, 602401, 741031, 833191, 904303, 961069, 1267501 (列表图表参考历史文本内部格式)
抵消
1,1
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
对于n=5,p=19和q=23是连续素数,a(5)=(19^2-19*23+23^2)/3=151是素数。
MAPLE公司
R: =空:q:=2:计数:=0:
当计数<100 do时
p: =q;q: =下一素数(p);
r: =(p^2-p*q+q^2)/3;
如果r::integer和isprime(r),则
计数:=计数+1;R: =R,R;
fi;
日期:
R;
数学
cpQ[{a_,b_}]:=模[{c=(a^2-a*b+b^2)/3},如果[PrimeQ[c],c,Nothing]];cpQ/@分区[Prime[Range[500]],2,1](*哈维·P·戴尔2023年12月31日*)
程序
(Python)
从sympy导入isprime,nextprime
定义缺陷(极限):
p、 q,num,alst=3,5,7,[]
当num//3<=限制时:
如果num%3==0且isprime(num//3):alst.append(num//3)
p、 q,num=q,下一素数(q),p**2-p*q+q**2
返回alst
打印(aupto(1267501))#迈克尔·布拉尼基2021年3月18日
交叉参考
囊性纤维变性。A339698型,A342705型.
关键词
非n
作者
状态
经核准的
第页1

搜索在0.008秒内完成

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

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

上次修改时间:美国东部夏令时2024年6月13日05:35。包含373366个序列。(在oeis4上运行。)