%I#23 2021年10月21日21:24:08
%S 0,1,0,1,2,1,1,0,1,2,3,2,1,2,1,0,12,3,2,3,3,4,3,2,1,2,3,1,2,3,
%温度2,3,4,3,2,4,5,4,4,2,3,3,3,1,2,3,1,2,3,4,1,2,2,3,3,
%U 4,3,2,3,4,5,4,3,4,3,2,3,4,5,5,6,5,4,3,4,5
%N a(N)=和{i=1..m}|d(i)-d(i-1)|,其中和{i=0..m}d(i。
%C i的个数,使|d(i)-d(i-1)|=1,其中Sum_{i=0..m}d(i)*2^i是n的base-2表示。
%H Reinhard Zumkeller,n的表,n=1..10000的a(n)</a>
%H Paul Barry,<a href=“https://arxiv.org/abs/2107.00442“>关于一些广义Rueppel序列的猜想和结果</a>,arXiv:2107.00442[math.CO],2021。
%H<a href=“/index/Bi#binary”>与n的二进制展开相关的序列的索引项</a>
%p A037834:=程序(n)
%p本地dgs;
%p dgs:=转换(n,基数,2);
%p加(abs(op(i,dgs)-op(i-1,dgs)),i=2…nops(dgs;
%p end程序:#_R.J.Mathar_,2015年10月16日
%t表[Total@Flatten@Map[Abs@Differences@#&,Partition[Integer Digits[n,2],2,1]],{n,90}](*_Michael De Vlieger_,2017年5月9日*)
%o(哈斯克尔)
%o a037834 n=总和$map from枚举$zipWith(/=)(尾部bs)bs
%o其中bs=a030308_row n
%o——Reinhard Zumkeller,2014年2月20日
%粤A005811(n)-1。
%Y参考A030308。
%K nonn,基础
%O 1,5型
%百灵鸟金伯利_
|