%I#6 2022年8月8日15:55:04
%S 2,6,15,79,6812116244541697183698728881891165056375518,
%电话:48349237815210045215502024820179299143607024237533552873,
%电话:3420610313490190637514786198103117467209102206423124954237847369223
%N素间隙序列中2n第N次出现的位置(A001223)。如果2n至少出现n次,则设置a(n)=-1。
%C素数间隙(A0001223)是连续素数之间的差值。它们开始于:1,2,2,4,2,4,6。。。
%e在达到6的第三次出现之前,我们需要前15个素数间隙(1,2,2,4,2,4,6,2,6,4,2,4,6),所以a(6)=15。
%t nn=1000;
%t gaps=差异[Array[Prime,nn]];
%t表格[Position[gaps,2*n][[n,1]],{n,Select[Range[nn],Length[Position[间隙,2*#]]>=#&]}]
%第一次亮相是在A038664,第二次是A356221。
%A356222的Y对角线。
%Y A001223列出了主要差距。
%Y A073491列出了具有无间隙质数指数的数字。
%Y A356224计算具有无间隙素数指数的除数,补充A356225。
%Y A356226=素数的无间隙区间长度,游程长度A287170。
%Y参考A000005、A028334、A029709、A060681、A119313、A137921、A193829、A274121。
%K nonn公司
%O 1,1号机组
%A _古斯·维塞曼_,2022年8月4日
|