%I#15 2023年4月3日10:36:10

%S 55094397425096474176474171248869131756092349469971039154933，

%电话：7114719473320215528373202155283712583712373817372572904797643617，

%电话：29047976436172904797643167

%N a（N）是最小的素数p，使得p和接下来的N-1素数都==5（mod 12）。

%C·狄克逊猜想意味着a（n）对所有n都存在。

%C a（18）>4*10^14。-_Giovanni Resta_，2013年8月4日

%H主要词汇表，<a href=“https://t5k.org/glossary/page.php？sort=DicksonsConjecture公司“>迪克森猜想</a>

%t对于[i=n=1，True，Null，对于[j=0，j<n&&Mod[Prime[i+j]，12]==5，j++，Null]；如果[j==n，打印[Prime[i]]；n++、i++]]

%t模[{nn=129*10^5，pr5}，pr5=表[If[Mod[Prime[n]，12]==5,1,0]，{n，nn}]；素数[#]和/@Flatten[Table[SequencePosition[pr5，PadRight[{}，k，1]，{k，9}]，1][[All，1]]（*程序生成序列的前9个项。*）（*Harvey P.Dale_，2022年2月2日*）

%o（PARI）{i=n=1；while（1，j=0；whiles（j<n&&质数（i+j）%12==5，j++）；if（j==n，打印（质数（i）；n++，i++））}

%Y参见A068227、A068228、A068299、A040117、A068231、A068232、A068333、A068235。

%很好，不

%O 1,1号机组

%A Ferenc Adorjan（fadorjan，AT）freemail.hu），2002年2月22日

%E编辑：Dean Hickerson，2002年3月6日

%E来自Giovanni Resta的更多条款，2006年2月18日