%I#29 2020年7月5日12:56:21

%S 55052388473591327103917915903221183992437939127131903，

%电话29859839319815673244031934406399368639993748659138273023，

%电话：42205183464486394849663954001663570163196094847961439999621281276270566367184639

%N素数p使得bigomega（p+1）=20。

%H Zak Seidov，<a href=“/A283652/b283652.txt”>n的表，a（n）表示n=1.-10000</a>

%t p=4128767；当[p<=57016319时，如果[PrimeOmega[1+p]==20，打印[p，“，”]]；p=NextPrime[p+2]]（*_Indranil Ghosh，2017年3月13日，在作者的PARI计划之后*）

%t选择[Prime[Range[4*10^6]]，PrimeOmega[#+1]==20&]（*哈维·P·戴尔，2020年7月5日*）

%o（PARI）{p=4128767；while（p<=57016319，if（bigomega（1+p）==20，print1（p“，”））；p=下一素数（p+2））}

%Y参考A023514，A118883。

%K nonn公司

%O 1,1号机组

%A _Zak Seidov，2017年3月12日