登录
如果k不是最小的正整数,并且在其二进制表示中具有特定的多个运行长度集(0或1),则包含正整数k。

%I#19 2025年3月14日19:47:52

%S 6,11,13,14,20,22,23,25,26,27,28,29,30,38,39,40,41,43,44,45,46,47,49,

%电话:50,52,53,54,55,57,58,59,60,61,62,70,72,75,77,78,79,80,81,82,83,84,86,

%U 87,88,89,90,91,92,93,94,95,97,98100101102103105106107108109单位

%N如果k不是最小的正整数,并且在其二进制表示中有其特定的多个运行长度集(0或1),则包含正整数k。

%C A175020包含不在此序列中的正整数。

%H Michael De Vlieger,n的表,a(n)表示n=1..10000</a>

%二进制中的e9是1001。运行长度形成多集(1,2,1)。由于小于9的正整数没有相同的多段长度集,因此9不在这个序列中。

%e另一方面,二进制中的23等于10111。运行长度为(1,1,3)。但二进制中的17(小于23)是10001,其游程长度为(1,3,1)。由于多集(1,1,3)和(1,3,1)是相同的,因此23是这个序列。

%t块[{nn=109,s},s=Array[Sort@Map[Length,Split@IntegerDigits[#,2]]&,nn];补码[Range[nn],Values[PositionIndex@s][[All,1]]](*_Michael De Vlieger_,2017年9月3日*)

%o(PARI){A175021_first(n)=my(k,S=[]);向量(n,R,while(!setsearch(S,R=vecsort(A101211_row(k++)),S=setunion(S,[R]));k)}\\_M.F.Hasler_,2025年3月11日

%o(Python)

%o来自itertools导入计数,groupby

%o定义A175021(n=无,stop=3**33):#如果未给定n,则返回a(n)或序列生成器

%o如果不是n:返回(A175021(n)表示n在范围内(1,停止))

%o如果没有hasattr(A:=A175021,‘术语’):A.terms=[0];A.rls=设置();A.签名=\

%o lambda n:元组(已排序(len(list(g))for _,g in groupby(bin(n)[2:]))

%o当n>=len(A.terms)时:

%o A.terms.append(接下来(k代表计数中的k(A.terms[-1]+1)

%o如果(s:=A.rls中的A.signature(k))或A.rls.add(s))

%o返回A.terms[n]#_M.F.Hasler_,2025年3月11日

%Y参考A175020。

%K nonn,基础

%O 1,1号机组

%A _罗伊查询,2009年11月3日

%E由雷·钱德勒于2010年3月11日延期