登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A165414型 a(n)=n的二进制表示中每一个仅出现一次的运行长度数。 2
1, 0, 1, 2, 0, 2, 1, 2, 1, 0, 1, 0, 1, 2, 1, 2, 1, 1, 1, 1, 0, 1, 1, 2, 1, 1, 1, 2, 1, 2, 1, 2, 1, 1, 3, 0, 1, 0, 3, 1, 1, 0, 1, 0, 1, 1, 1, 2, 3, 0, 0, 0, 1, 0, 3, 0, 3, 1, 3, 2, 1, 2, 1, 2, 1, 1, 3, 2, 1, 2, 1, 2, 0, 1, 0, 1, 0, 2, 3, 1, 1, 1, 0, 1, 0, 1, 1, 2, 0, 1, 0, 2, 1, 1, 1, 2, 3, 2, 1, 1, 0, 1, 1, 2, 0 (列表图表参考历史文本内部格式)
抵消
1,4
链接
例子
二进制中的92是1011100。有一个运行1,然后运行1 0,然后运行3个1,最后运行2个0。因此,运行长度为(1,1,3,2)。每种长度只出现一次的长度值为(3,2)。由于有两个值出现一次,因此a(92)=2。
数学
表[Count[Tally[Length/@Split[Integer Digits[n,2]],_?(#[2]]==1&)],{n,120}](*哈维·P·戴尔2017年5月11日*)
黄体脂酮素
(平价)
binruns(n)={
如果(n==0,则返回([1,0]);
my(bag=List(),v=0);
而(n!=0,
v=估价(n,2);listput(bag,v);n>>=v;n++;
v=估价(n,2);listput(bag,v);n>>=v;n--);
返回(Vec(袋));
};
a(n)={
my(v=binruns(n),hist=向量(1+logint(n+1,2)));
对于(i=1,#v,如果(v[i]!=0,his[v[i]]++));
#选择(k->(k==1),历史记录)
};
向量(105,i,a(i))\\Gheorghe Coserea公司2015年9月24日
交叉参考
囊性纤维变性。A005811号,A165413年.
关键词
基础,非n
作者
勒罗伊·奎特,2009年9月17日
扩展
由扩展雷·钱德勒2010年3月13日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月19日18:05。包含371798个序列。(在oeis4上运行。)