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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A037854号 求和{i=1..m,d(i)>d(i-1)}d(i。
0, 0, 0, 1, 0, 0, 0, 2, 1, 0, 0, 3, 2, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 2, 1, 0, 0, 3, 2, 1, 0, 2, 2, 2, 2, 2, 1, 1, 1, 2, 1, 0, 0, 3, 2, 1, 0, 3, 3, 3, 3, 3, 2, 2, 2, 3, 2, 1, 1, 3, 2, 1, 0, 1, 1, 1, 1, 2, 1, 1, 1, 3, 2, 1, 1, 4, 3, 2, 1, 1, 1, 1, 1, 1, 0, 0, 0, 2, 1, 0 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,8
评论
这是base-4向下变异序列;看见A297330型. -克拉克·金伯利2018年1月18日
链接
克拉克·金伯利,n,a(n)表,n=1.10000
MAPLE公司
A037854号:=进程(n)
a:=0;
dgs:=转换(n,基数,4);
对于i从2到nops(dgs)do
如果op(i,dgs)>op(i-1,dgs),则
a:=a+op(i,dgs)-op(i-1,dgs);
结束条件:;
结束do:
a;
结束进程:#R.J.马塔尔2015年10月19日
数学
d[n_]:=d[n]=差异[RealDigits[n,4][[1]]
表[Total[Select[d[n],#>0&]],{n,1,z}];(*A037845号*)
-表[Total[Select[d[n],#<0&]],{n,1,z}];(*A037854号*)
(*克拉克·金伯利2015年10月20日*)
交叉参考
囊性纤维变性。A297330型.
关键词
非n,基础
作者
扩展
定义与交换A037845号通过R.J.马塔尔2015年10月19日
状态
经核准的

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

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

上次修改时间:2024年6月16日13:54 EDT。包含373429个序列。(在oeis4上运行。)