%I#14 2021年1月31日20:33:31

%S 1,2,3,5,7,8,9,10,11,13,14,15,17,19,21,23,25,27,29,31,32,33,34,35,37，

%电话：40、41、42、43、45、46、47、49、51、53、55、56、58、59、61、62、67、71、73、75、77、79、83，

%U 85,89,91,97101103105109111113115119121123127128131133单位

%N如果k的二进制表示中0和1的每一个长度都与k互质，则包含正整数k。

%C由0或1的“游程”表示：将二进制k视为0和1的字符串。数字b（0或1）的一次游程完全由等于b的连续数字组成，其两端以数字1-b或字符串结尾为界。

%H Jasper Mulder，n的表，n的a（n）=1..20000</a>

%二进制中的e 103是1100111。在这个表示法中有两个1，两个0和三个1。因为103是这些长度（2和3）的互质，所以103在序列中。

%t lst={}；对于[n=1，n<=10000，n++，If[Fold[And，True，CoprimQ[#，n]&/@（Length/@Split[IntegerDigits[n，2]]）]，打印[n]]（*Jasper Mulder（Jasper.Mulder（AT）planet.nl），2009年7月15日*）

%t选择[Range[2^7]，AllTrue[Length/@Split@IntegerDigits[#，2]，Function[k，CoprimQ[#，k]]&]（*_Michael De Vlieger_，2017年11月4日*）

%Y参考A162534、A162537。

%K基，nonn

%O 1,2号机组

%A _罗伊查询，2009年7月5日

%2009年7月15日Jasper Mulder（Jasper.Mulder（AT）planet.nl）的E术语<10000