%I#19 2021年4月14日05:23:16

%S 0,0,1,1,1,2,2,2,1,2,2,2,2,3,3,3,1,2,3,2,2,2,3,,3,2,33,32,3,4,4,3，

%电话：4,3,3,4,3,1,2,3,3,13,4,1,4,4,5,4,2,3,1,4,14,4,12,4,4'，

%U 4,4,5,4,4,1,4,4],4,6,4,8,4,3,4,2,3,3,3,1,4,14,3,1

%N i的个数，使得d（i）<=d（i-1），其中Sum_{i=0..m}d（ii）*2^i是N的基-2表示。

%H Ralf Stephan，一些分治序列</a>

%H Ralf Stephan，生成函数表</a>

%F From _Ralf Stephan，2003年10月5日：（开始）

%系数：-1/（1-x）+1/（1-x）*和{k>=0}（t+t^3+t^4）/（1+t+t*2+t^3），t=x^2^k）。

%F a（n）=A056973（n）+A000120（n）-1。

%F a（n）=b（n）-1，其中b（0）=0，b（2n）=bn（n）+[n偶数]，b（2 n+1）=bn+1。（结束）

%e n=4的base-2表示是100，其中d（0）=0，d（1）=0、d（2）=1。从d（0）到d（1）有一个fall-or-equal，因此a（4）=1_R.J.Mathar，2015年10月16日

%p A037809:=程序（n）

%p a：=0；

%p dgs:=转换（n，基数，2）；

%p代表i从2到nops（dgs）do

%p如果op（i，dgs）<=op（i-1，dgs），则

%pa:=a+1；

%p end if；

%p端do：

%p a；

%p end程序：#_R.J.Mathar_，2015年10月16日

%Y参考A033265。

%K nonn，基础

%O 1,7型

%百灵鸟金伯利_

%R.J.Mathar_于2015年10月16日更正的E登录名