%I#32 2022年9月4日18:52:14
%编号19,79109229349379439976985910091279142914891549,
%电话1579160919992239226923892539265926892749301930793319,
%电话:352939194129451946394729489494999547955695689577958396199
%N素数p,使得p+4是素数,p==9(mod 10)。
%C摘自Rémi Eismann,2006年5月14日;2007年5月4日:(开始)
%C也是A117078中k等于5的素数。示例:素数(9)=prime(8)+(素数(8)模5)=19+(19模5)=23;素数(23)=prime(22)+(素数(22)模5)=79+(79模5)=83;素数(1359)=素数(135)+(素数(2358)模5)=11239+(11239模5)=11243。
%C此序列中的素数的形式为(10i-1),i=(level(n)+1)/2,level,(n)在A117563中定义。
%C考虑A117078:a(n)=最小的k,这样素数(n+1)=素数(n)+(素数(n)mod k),或者如果不存在这样的k,则为0。序列给出了k=5的素数(n)的值。(结束)
%Cp是近亲素数(p,p+4)的较小成员,因此p==9(mod 10)_Muniru A Asiru_,2017年7月3日
%H Remi Eismann,n的表,n的a(n)=1..10000</a>
%H Eric Weisstein的数学世界,<a href=“http://mathworld.wolfram.com/CousinPrimes.html“>表亲初级</a>
%t素数[Select[Range[1000],素数[#]+4==素数[#1]&Mod[Prime[#],10]==9&]]
%t转置[Select[Partition[Prime[Range[820]],2,1],Last[#]-First[#]==4&&Mod[First[#],10]==9&]][1](*哈维·P·戴尔,2011年10月20日*)
%o(PARI)是(n)=n%30==19&&isprime(n+4)&&isprime(n)\\_Charles R Greathouse IV_,2017年7月12日
%o(PARI)列表(lim)=我的(v=列表(),p=19);对于素数(q=23,lim+4,if(q-p==4&&p%30==19,listput(v,p));p=q);Vec(v)\\_Charles R Greathouse IV_,2017年7月12日
%Y参考A001223、A117078、A117563。
%A023200和A030433的Y交叉口。
%K nonn,简单
%O 1,1号机组
%A _Roger L.Bagula,2002年9月30日
%E编辑:Robert G.Wilson v_和N.J.A.Sloane,2002年10月3日
%E条目由N.J.A.Sloane修订,2007年2月24日
|