|
|
抵消
|
0,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
a（2）=15，因为对于k=15，有两个这样的对，（7,23）和（13,17）：2*15+7=37，2*15+23=53，7*23-2*15=131，7*23+2*15=191，2*15+13=43，2*15A7=47，13*17-2*15=1191和13*17+2*15=251都是素数；15是有效的最小k。
|
|
|
MAPLE公司
|
f： =proc（n）局部计数，p，q；
p： =2*n-1；计数：=0；
做
p： =预素数（p）；
如果p＜n，则返回计数fi；
q： =2*n-p；
如果isprime（q）和isprime（2*n+q）和isprime（2*n+p）以及isprime（p*q-2*n）和isprime（p*q+2*n），则count：＝count+1fi；
日
结束进程：
f（1）：=0:f（2）：=0：
五： =数组（0..12）：计数：=0:
当计数<13 do时，n从1开始
v： =f（n）；
如果v<=12且v[v]=0，则
计数：=计数+1；V[V]：=n
fi（菲涅耳）
日期：
转换（V，列表）；
|
|
|
数学
|
f[n_]：=和[If[AllTrue[{k，2*n-k，2*n+k，4*n-k、k*（2n-k）-2*n，k*（2 n-k）+2*n}，素数Q]，1，0]，{k，1，n}]；seq[len_，max_]：=模块[{s=表[0，{len}]，n=1，c=0，i}，而[c<len&&n<=max，i=f[n]+1；如果[i<=len&&s[[i]]==0，c++；s[[i]]=n]；n++]；s] ；连续[13,10^4](*阿米拉姆·埃尔达尔2022年5月31日*）
|
|
|
黄体脂酮素
|
（PARI）a354449（n）=我的（x=2*n，i=0）；对于素数（q=1，x，对于素数，p=1，q-1，如果（p+q==x&ispseudoprime（x+p）&ispseudoprime；我
（PARI）小于等于（n）={n*=2；v=向量（n\2）；对于素数（p=3，n，对于素数）（q=3，min（p，n-p），k2=p+q；if（ispseudoprime（k2+p）&ispseudomime>#res，res=concat（res，vector（v[i]+1-#res））；如果（res[v[i]+1]==0，res[v[i]+1]=i）；res}\\大卫·A·科内斯，2022年6月1日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
