|
|
A164707号 |
| 如果二进制n中1的所有游程都具有相同的长度,则包括正整数n。 |
|
22
|
|
|
1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 12, 14, 15, 16, 17, 18, 20, 21, 24, 27, 28, 30, 31, 32, 33, 34, 36, 37, 40, 41, 42, 48, 51, 54, 56, 60, 62, 63, 64, 65, 66, 68, 69, 72, 73, 74, 80, 81, 82, 84, 85, 96, 99, 102, 108, 112, 119, 120, 124, 126, 127, 128, 129, 130, 132, 133, 136
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
抵消
|
1,2
|
|
评论
|
澄清:二进制数由完全为1的“运行”和完全为0的运行交替组成。没有两个或多个运行—所有相同的数字都是相邻的。
此序列包含部分正整数,每个正整数都包含一个1。对于此序列中每个成员至少有两个1的运行,请参阅A164709号.
|
|
链接
|
|
|
例子
|
术语序列及其二进制展开式和二进制索引开始于:
1: 1 ~ {1}
2: 10 ~ {2}
3: 11 ~ {1,2}
4: 100 ~ {3}
5: 101 ~ {1,3}
6: 110 ~ {2,3}
7: 111 ~ {1,2,3}
8: 1000 ~ {4}
9: 1001 ~ {1,4}
10: 1010 ~ {2,4}
12: 1100 ~ {3,4}
14: 1110 ~ {2,3,4}
15:1111至{1,2,3,4}
16: 10000 ~ {5}
17: 10001 ~ {1,5}
18: 10010 ~ {2,5}
20: 10100 ~ {3,5}
21: 10101 ~ {1,3,5}
24:11000至{4,5}
27: 11011 ~ {1,2,4,5}
(结束)
|
|
MAPLE公司
|
isA164707:=进程(n)本地bdg、arl、lset;bdg:=转换(n,基数,2);lset:={};arl:=-1;对于从1到nops(bdg)的p,如果op(p,bdg)=1,那么如果p=1,则arl:=1;否则arl:=arl+1;结束条件:;否则,如果arl>0,则lset:=lset并集{arl};结束条件:;arl:=0;结束条件:;结束do;如果arl>0,则lset:=lset并集{arl};结束条件:;返回(nops(lset)<=1);结束进程:对于从1到300的n,如果是A164707(n),则执行do,然后打印f(“%d,”,n);结束条件:;结束do#R.J.马塔尔2010年2月27日
|
|
数学
|
选择[Range@140,SameQ@@Map[Length,Select[Split@Integer Digits[#,2],First@#==1&]]&](*迈克尔·德弗利格2017年8月20日*)
|
|
黄体脂酮素
|
(Perl)
每个(1..140){
%运行=();
$runs{$_}++foreach split/0+/,sprintf(“%b”,$_);
如果1==键(%运行),则打印“$_”;
}
|
|
交叉参考
|
|
|
关键词
|
基础,非n
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|