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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A274604型 Noergaard“无穷序列”的运行和A004718号. 1
0、1、0、2、3、1、4、3、5、5、6、8、7、4、8、9、7、10、11、10、10、13、14、17、15、11、16、15、17、17、18、20、19、16、20、21、20、22、23、23、21、24、26、25、22、26、25、27、28、25、29、31、30、34、31、26、32、33、31、34、35、34、36、37、38,38,41,39,35,40,40,41,40,42,43,43,41,44,43,45,45,46,48 (列表;图表;参考;;历史;文本;内部格式)
偏移
0,4
评论
如果s(n)为A004718号则a(2n)=n-s(n)和a(2n+1)=n+1。
链接
阿洛伊斯·海因茨,n=0..10000时的n,a(n)表
Yu Hin(Gary)Au、Christopher Drexler-Lemire和Jeffrey Shallit,诺格德无穷级数中的音符和音符对《数学与音乐杂志》,2017年第11卷,第1期,第1-19页。
MAPLE公司
b: =proc(n)选项记忆;局部r`如果`(n=0,0,
`如果`(irem(n,2,'r')=0,-b(r),b(r)+1))
结束时间:
a: =进程(n)a(n):=b(n)+`如果`(n=0,0,a(n-1))结束:
seq(a(n),n=0..100)#阿洛伊斯·海因茨2016年6月30日
数学
b[n_]:=b[n]=模[{q,r},如果[n==0,0,{q,r}=商余数[n,2];如果[r==0,-b[q],b[q]+1]];
a[n_]:=b[n]+如果[n==0,0,a[n-1]];
a/@范围[0100](*Jean-François Alcover公司2020年11月24日之后阿洛伊斯·海因茨*)
黄体脂酮素
(Python)
从itertools导入groupby
定义A274604型(n) :
如果n&1:返回(n>>1)+1
c=0
对于groupby中的k,g(bin(m:=n>>1)[2:]):
c=c+len(list(g)),如果k==“1”else(-c if len(list(g))&1 else c)
返回m-c#柴华武2023年3月3日
交叉参考
囊性纤维变性。A004718号.
关键词
非n
作者
杰弗里·沙利特2016年6月30日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月14日02:53。包含373392个序列。(在oeis4上运行。)