A063713-OEIS公司

A063713号

数n使得存在素数p，q，r，其中n*2=p-r=r+q（r的值在A063714号).

三

4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 15, 16, 17, 18, 20, 21, 22, 23, 24, 25, 27, 28, 30, 32, 33, 35, 36, 38, 39, 42, 43, 45, 46, 48, 50, 51, 52, 53, 54, 55, 57, 58, 60, 63, 65, 66, 67, 69, 70, 71, 72, 75, 77, 78, 80, 81, 84, 85, 87, 88, 90, 93, 96, 97, 98, 99, 100, 101, 102, 105

(列表;图表;参考文献;听;历史;文本;内部格式)

抵消

1,1

链接

罗伯特·伊斯雷尔，n=1..10000时的n，a（n）表

例子

10*2 = 20 = 23 - 3 = 3 + 17,A063714号(7) = 3; 11*2 = 22 = 41 - 19 = 19 + 3,A063714号（8）缺少=1928是因为我们有素数和（哥德巴赫）：5+23=11+17，而素数差小于28:31-3=41-13=47-19；这些都没有共同的素数。

MAPLE公司

过滤器：=proc（n）局部k；

k： =1；

而k<2*n do

k： =下一素数（k）；

如果是isprime（2*n+k）和isprim（2*n-k），则返回真fi

od；

假

结束过程：

选择（过滤器，[1..1000]美元）#罗伯特·伊斯雷尔2017年10月9日

数学

okQ[n_]：=AnyTrue[Prime[Range[PrimePi[2 n-2]]，PrimeQ[2 n+#]&&PrimeQ[2]；选择[Range[105]，okQ](*让-弗朗索瓦·奥尔科弗2018年2月12日*）