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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A334404飞机 a(0)=0;对于n>0,a(n)是一个之前未见过的整数,使得所有之前项的和加上a(n。 0
0, 2, 1, 4, -2, 6, 8, -6, 10, 14, -20, 12, 18, -16, 22, -12, 20, -18, 16, 24, -10, 28, -34, 30, -26, 32, -24, 34, -4, 40, -60, 38, 36, -56, 44, -14, 42, -48, 26, 54, -72, 52, 48, -66, 50, -42, 46, -30, 60, -90, 62, -36, 58, -52, 64, -22, -8, 74, -38, 68, -54, 66, -78, 76, -70, 82, -46 (列表;图表;参考;;历史;文本;内部格式)
抵消
0.2个
评论
请参见A175499号对于与尚未创建的最小正整数求和的等效序列。
链接
例子
a(1)=2是前面所有项的总和加上a(1,=0+2=2,其中2之前在序列中没有出现,素数2之前也没有创建。
a(2)=1是所有先前项加上a(2。
a(3)=4是所有先前项的总和加上a(3。注意,在a(2)之后的下一个最小的未生成素数是5,但这需要a(3)=2,这不允许作为a(1)=2。
a(4)=-2是前面所有项的总和加上a(4)=0+2+1+4-2=5,其中-2之前在序列中没有出现,素数5之前也没有创建。
数学
嵌套[Block[{k=1,s=Total[#[All,1]]],i=1,p},While[Nand[FreeQ[#[Al,-1]],Set[p,Prime@i]],FreeQ[#[All,1]],p-s]],i++];而[Nand[FreeQ[#[All,1]],k],k+s==p],如果[k<0,集[k,-k+1],k*=-1]];追加[#,{k,p}]]&,{{0,0}},66][[All,1]](*迈克尔·德弗利格2020年9月11日*)
交叉参考
囊性纤维变性。A175499号,A000040型,A000217号
关键词
签名
作者
斯科特·R·香农2020年9月8日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月26日09:40。包含372824个序列。(在oeis4上运行。)