%I#2023年12月29日01:51:10

%电话：744537447174489745077654376561765797659713289313291132929，

%电话1329471822431822611822791822972028232023202841202859202877，

%电话：297403297421297492974573587933588113588293588474859234859414859485977

%N算术级数中四个连续素数的集合列表，具有公共差18。

%C这是一个按行读取的4列表。

%H Robert Price，n表，n=1..6032的a（n）</a>

%H<a href=“/index/Pri#primes_AP”>算术级数中与素数相关的序列的索引项</a>

%p a：=[]；

%p代表n，从1到50000 do

%p1：=i素数（n）；

%p p2：=下一个顶点（p1）；

%p如果（p2-p1）=18，则

%p3:=下一素数（p2）；

%p如果p3-p2=18，则

%p4：=下一素数（p3）；

%p如果p4-p3=18，则a：=[op（a），p1，p2，p3，p4]；fi；

%p fi；

%p fi；

%日期：

%第页；#_N.J.A.Sloane，2017年11月23日

%t选择[Partition[Prime[Range[41000]]，4,1]，Union[Differences[#]]=={18}&]//Flatten（*_哈维·P·戴尔，2017年11月24日*）

%Y关于每组四个素数的初始素数，请参见A033448。

%K nonn，标签

%O 1,1号机组

%杰夫·伯奇（_Jeff Burch）_

%E由N.J.A.Sloane于2017年11月23日确认（最后一组四份已完成）