OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A202472型 哥德巴赫问题扩展到减法:2n分解为两个素数p,q的无序差分的次数,其中p<2n<q。 4
0, 1, 1, 2, 2, 3, 2, 3, 3, 3, 2, 6, 4, 3, 6, 3, 4, 6, 4, 5, 8, 4, 4, 7, 6, 4, 9, 8, 4, 11, 5, 5, 11, 6, 8, 9, 4, 7, 11, 7, 4, 13, 7, 5, 15, 7, 8, 13, 8, 9, 11, 7, 7, 13, 10, 5, 13, 7, 7, 19, 9, 8, 17, 9, 10, 16, 9, 9, 15, 12, 7, 19, 9, 7, 19, 9, 12, 17, 8, 14 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,4
链接
数学
表[Length[Select[Prime[Range[PrimePi[2*n]],PrimeQ[2*n+#]&]],{n,100}](*T.D.诺伊2013年4月16日*)
黄体脂酮素
(PARI)a(n)=本人;对于素数(p=2,2*n,s+=i素数(2*n+p));秒\\查尔斯·格里特豪斯四世2011年12月19日
(C++)
#包括<iostream>
使用命名空间标准;
整型main()
{整数p[25]={2,3,5,7,11,13,17,19,23,29,31,37,41,43,47,53,59,61,67,71,73,79,83,89,97};
int计数,istart=2;
对于(int n=1;n<=25;n++)
{
如果(2*n>p[istart])istart++;
计数=0;
对于(int j=1;p[j]<2*n;j++)
对于(int i=istart;p[i]-p[j]<=2*n;i++)
如果(p[i]-p[j]==2*n)计数++;
cout<<n<<“.”<<count<<endl;
}
返回0;
}//前25个整数的代码,詹姆斯·克莱因2011年12月21日
交叉参考
的扩展A002375号.
关键词
非n
作者
詹姆斯·克莱因2011年12月19日
状态
经核准的

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年5月24日01:38。包含372768个序列。(在oeis4上运行。)