登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A051935号 a(n)=最小数>a(n-1),使得a(1)+a(2)+…+a(n)是素数。 7
2, 3, 6, 8, 10, 12, 18, 20, 22, 26, 30, 34, 36, 42, 44, 46, 50, 52, 60, 66, 72, 74, 76, 78, 80, 82, 102, 108, 114, 116, 118, 126, 128, 132, 136, 138, 144, 146, 150, 154, 158, 162, 166, 170, 174, 186, 196, 198, 210, 222, 228, 236, 240, 244, 246, 254, 270, 280, 282 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
David A.Corneth,n=1..10000时的n,a(n)表(T.D.Noe的前2000个术语)
Code Golf StackExchange,代码高尔夫球场,计算最小值a(n)>a(n-1),使a(1)+a(2)++a(n)是素数,编码挑战开始于2018年8月17日。
例子
第三项是6,因为2+3+6=11是质数。
数学
p=2;lst={p};Do[If[PrimeQ[p+n],AppendTo[lst,n];p=p+n],{n,3,10^3}];第一次(*弗拉基米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基2008年8月14日*)
nxt[{t_,a_}]:=模[{k=a+1},While[!素数Q[t+k],k++];{t+k,k}];转座[NestList[nxt,{2,2},60]][[2](*哈维·P·戴尔2016年4月10日*)
nxt[{t_,a_}]:=模[{k=a+1},k=NextPrime[t+k-1]-t;{t+k,k}];NestList[nxt,{2,2},60][[All,2]](*比上面的程序效率更高*)(*哈维·P·戴尔2019年8月26日*)
黄体脂酮素
(Perl)使用理论“:all”;my($s,@L)=(2,2);对于(1..99){push@L,next_prime($s+$L[-1])-$s;$s+=$L[-1-];}打印“[@L]\n”#达娜·雅各布森2018年9月25日
(PARI)第一个(n)={my(res=向量(n),os=2,ns);res[1]=2;对于(i=2,n,ns=下一个素数(os+res[i-1]+1);res[i]=ns-os;os=ns);re}\\大卫·A·科内斯2019年8月26日
(Python)
从sympy导入isprime
从itertools导入islice
def agen():#术语生成器
[2,3]的产量
s、 a=5,4
为True时:
虽然不是isprime(s+an):an+=2
产生一个
an,s=an+2,s+an
打印(列表(islice(agen(),60))#迈克尔·布拉尼基2022年10月30日
交叉参考
囊性纤维变性。A051934号,A078706号,A360061型.
关键词
容易的,美好的,非n
作者
费利斯·鲁索1999年12月21日
状态
经核准的

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

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

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