%I#32 2023年9月24日07:51:35

%S 10,21,55,911872473915517131073127115911927227927733233，

%电话：39534331489156096059703180518989999110807112271209113843，

%电话：1480317399182092041320989233932461326219281992989331313

%N a（N）=素数（N）*素数（N+2）。

%C A192133的后续。-_Reinhard Zumkeller_，2011年6月26日

%C对于n>1:A078898（a（n））=4.-_Reinhard Zumkeller_，2015年4月6日

%H Reinhard Zumkeller，n的表，n=1..10000的a（n）</a>

%H C.Cobeli和A.Zaherescu，<A href=“http://dx.doi.org/10.1080/10236198.2014.940337“>带除数和指数绝对差的游戏，《差分方程与应用杂志》，第20卷，第11期（2014年），第1489-1501页，DOI:10.1080/10236198.2014.940337。也可作为<a href=“http://arxiv.org/abs/1411.1334“>arXiv:1411.1334[math.NT]</a>，2014年。

%e a（5）=素数（5）*素数（7）=11*17=187。

%t表[Prime[n]Prime[n+2]，{n，1，40}]（*_Robert G.Wilson v_，2004年1月22日*）

%t最后[#]第一[#]和/@分区[Prime[Range[50]]，3,1]（*哈维·P·戴尔，2013年5月8日*）

%o（MuPAD）ithprime（i）*ithprime

%o（鼠尾草）

%o定义prime_gaps（n）：

%o素数间隙=[]

%o n素数=素数firstn（n+1）

%o对于范围（2，n+1）内的i：

%o素数间隙.append（nprimes[i]*nprimes[2]）

%o返回素数间隙

%o print（prime_gaps（60））#_Zerinvary Lajos，2008年7月8日

%o（哈斯克尔）

%o a090076 n=a090076_列表！！（n-1）

%o a090076_list=zipWith（*）a000040_list$drop 2 a000040-list

%o——Reinhard Zumkeller，2014年12月17日

%无平方半素数的Y子集，A006881。参见A006094、A090090。

%Y参考A078898。

%K简单，无

%O 1,1号机组

%2004年1月21日，A_Felix Tubiana

%E由_Robert G.Wilson v扩展，2004年1月22日