%I#23 2015年9月27日10:27:46

%序号：2,2,19,1986297486692506981228698251228698251

%N对于i=2,3，…，开始素数链的最小素数p（1）。。。，n.（名词）。

%C初始素数p（1）不能是3模10（除了p（1。

%F p（i）-p（i-1）=（i！-（i-1！）*（p（1）-1）。

%e a（5）-->p（1）=19，因为p（2）=2*p（1。

%o（PARI）\\查找（9）

%o n=8；v=矢量（n）；对于素数（p=2,10^9，i=0；a=2*p-1；b=3*a-2；c=4*b-3；d=5*c-4；e=6*d-5；f=7*e-6；g=8*f-7；h=9*g-8；如果（i素数（a），i++；v[1]=a，v[1]=0）；如果（i素数（b），i++；v[2]=b，v[2]=0）；如果（i素数（c），i++；v[3]=c，v[3]=0）；如果（i素数（d），i++；v[4]＝d、v[4]＝0）；如果（i素数（e），i++；v[5]=e，v[5]=0）；如果（i素数（f），i++；v[6]=f，v[6]=0）；如果（i素数（g），i++；v[7]=g，v[7]=0）；如果（isprime（h），i++；v[8]=h，v[8]=0）；如果（i>n-1，打印（[p，v，i]））

%o（PARI）ct（p）；我的（i=2）；while（i素数（p=i*p-i+1），i++）；我

%o a（n）=表示素数（p=2，如果（ct（p）>n，返回（p）））

%Y参考A005603、A088251。

%K nonn，更多

%O 1,1号机组

%A _罗宾加西亚，2013年6月22日