1,2
这个序列给出了A055625号(n) 通过增加幅度排序后。
n=1..35时的n,a(n)表。
J.K.Andersen,连续同余素数.
雨果·普福尔特纳,记录6k+-1形式素数的生成运行
雨果·普福尔特纳,FORTRAN函数ISPRIM检查素性。
a(3)=3,a(4)=6,a(5)=4,因为形式6*k+1(174117471753175917771783)的6个连续素数的第一次出现发生在形式6*k+1的3个连续素物(151157163)的第一次发生之后,以及4个连续“6k+1”素数(304930613073079)的第一个出现之前。
(*程序不适合计算大量项。*)
pp=表[{p=素数[n],Mod[p,6]},{n,10^7}];
sp=拆分[pp,Mod[#1[[2]],6]==Mod[#2[[2],6]&];
b[n_]:=SelectFirst[sp,Length[#]==n&&MatchQ[#,{_Integer,1}..}]&][[1,1]];
排序[表[{b[n],n},{n,1,16}][[All,2]](*Jean-François Alcover公司2018年11月21日*)
链接处给出了FORTRAN程序。
囊性纤维变性。A055625号,A085516号(排序“6k-1”素数第一轮的出现)。
上下文中的序列:A213625型 A132368号 A157248号*A082354号 A130344号 A122344号
相邻序列:A085512号 A085513号 A085514号*A085516号 A085517号 A085518号
更多,非n
雨果·普福尔特纳2003年7月31日
更多来自Herman Jamke(hermanjamke(AT)fastmail.fm)的条款,2006年10月27日
a(32)-a(35)来自乔瓦尼·雷斯塔2013年8月4日
经核准的