%I#14 2020年5月8日15:17:54
%S 283115317232053214334133583332338534243424273434834663,
%电话:53235903613361634365536793680372537963824383538543,
%电话:85638783889392839403102231031043310931138312253127031306313513139331429314983
%N素数p_k,使得p_k==3(mod 10)和p_(k+1)==3。
%H Robert Israel,n的表,a(n)表示n=1..10000</a>
%H R.J.Lemke Oliver和K.Soundararajan,<a href=“http://arxiv.org/abs/1603.03720“>连续素数分布中的意外偏差</a>,arXiv:1603.03720[math.NT],2016。
%H R.J.Lemke Oliver和K.Soundararajan,<a href=“https://doi.org/10.1073/pnas.1605366113“>连续素数分布中的意外偏差</a>,《美国国家科学院院刊》,第113卷,第31期(2016年),E4446-E4454。
%p滤波器:=t->i素数(t)和下素数(t)mod 10=3:
%p选择(过滤器,[seq(i,i=3..20000,10)]);#_罗伯特·伊斯雷尔,2020年5月8日
%t First@Transpose@Select[Partition[Select[Range[2000],PrimeQ],2,1],Mod[First[#],10]==3&&Mod[Last[#],10]==3&&](*_Amiram Eldar_,2020年2月19日*)
%Y参见A030430(1,任意)、A330366(1,1)、A331555(1,3)、A331.324(1,7)、A332674(1、9)、A030431(3,任意),A332675(3,1),该序列(3,3),A030432(7,任意)和A030433(9,任意)[其中(a,b)表示p_k==a(mod 10)和p_(k+1)==b(mod)]。
%K nonn公司
%O 1,1号机组
%A A.H.M.Smeets_,2020年2月19日