%I#24 2014年5月30日08:51:14

%S 10,26,50254170392362944821892137024201850221037646314，

%电话37224892504270828612938079221232011414106145013844，

%电话：18872161301716220414193222667226142559229504373910299304493062036482

%N最小偶数k，使得lpf（k-1）=素数（N），而lpf（k-3）>素数（N），其中lpf=最小素数因子（A020639）。

%这个序列与双素数无穷大的一个充分条件有关。

%几乎所有形式a（n）-3的数都是素数。关于这种形式的复合数，请参见A242716。

%C素数p，其中a（p）=p^2+1构成p>=3的序列A062326。-_弗拉基米尔·谢维列夫，2014年5月21日

%H Peter J.C.Moses，n的表，a（n）表示n=2.2501</a>

%F a（n）>=素数（n）^2+1.-_Vladimir Shevelev，2014年5月21日

%e设n=2，素数（2）=3。那么lpf（10-1）=3，但lpf（10-3）=7>3。

%e由于k=10是最小的k，那么a（2）=10。

%t lpf[n_]：=lpf[n]=第一个[Select[Divisors[n]，PrimeQ[#]&]]；

%t表[test=Prime[n]；NestWhile[#+2&，测试^2+1，！（（lpf[#-1]==测试）&&（lpf[#-3]>测试））&]，{n，2,60}]（*_Peter J.C.Moses_，2014年5月21日*）

%o（PARI）a（n）={k=6；p=素数（n）；while（（因子（k-1）[1,1]！=p）||（因子（k-3）[1,1]<=p），k+=2）；k；}马库斯，2014年5月16日

%Y参考A001359、A006512。

%K nonn公司

%氧2,1

%2014年5月16日，A_Vladimir Shevelev

%E来自米歇尔·马库斯的更多条款，2014年5月16日