登录
A339625型
a(n)是用较小的孪生素数p写6*n=p+q的方法(A001359号)q是一个更大的孪生素数(A006512号).
2
0, 1, 2, 3, 2, 3, 2, 4, 2, 3, 2, 4, 4, 3, 4, 0, 4, 2, 6, 5, 2, 4, 2, 5, 4, 4, 4, 6, 2, 6, 2, 4, 6, 5, 12, 3, 6, 2, 4, 8, 6, 8, 8, 2, 6, 3, 6, 10, 4, 13, 2, 6, 4, 4, 10, 4, 10, 4, 6, 3, 4, 6, 10, 5, 8, 1, 0, 6, 2, 12, 4, 6, 6, 2, 10, 3, 10, 6, 6, 7, 2, 8, 4, 6, 6, 0, 6, 6, 6, 9, 2, 6, 2, 5, 6, 4
抵消
1,3
评论
如果6*n=p+q,那么6*n=(p+2)+(q-2),其中p+2是更大的孪生素数,q-2是更小的孪生素数。因此,当且仅当n/2在A002822号.
链接
罗伯特·伊斯雷尔,n=1..10000时的n,a(n)表
例子
a(4)=3,因为6*4=24=5+19=11+13=17+7,其中(5,7)、(11,13)和(17,19)是孪生素数对。
MAPLE公司
N: =600:#对于a(1)。。a(地板(N/6))
P: =选择(isprime,{seq(i,i=3..N,2)}):
T1:=排序(转换(P相交映射(`-`,P,2),列表)):
T2:=映射(`+`,T1,2):
五: =矢量(N):
nT:=nops(T1):
对于i从1到nT do
对于从1到nT的j do
v: =T1[i]+T2[j];
如果v>N,则打破fi;
V[V]:=V[V]+1;
日期:
seq(V[6*i],i=1..N/6);
交叉参考
关键词
非n
作者
状态
经核准的