%I#84 2024年4月21日21:12:22

%S 0,0,1,0,1,1,2,3,0,12,3,4,5,6,7,1,2,3,5,5,6，7,8,9,10,11,12,13,14,15，

%T 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25，

%U 26,27,28,29,30,31,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20

%N到2的最大幂的距离小于或等于N；用二进制写n，将第一个数字改为零，然后再转换回十进制。

%C按行读取的三角形，其中第n行列出前2^n个非负整数（A001477），n>=0。右边框显示A000225。行总和给出A006516。参见示例_Omar E.Pol_，2013年10月17日

%C如果没有初始零：以3为基数的无零数字（A032924:1、2、11、12、21…），三元数字减少1，读作二进制_M.F.Hasler，2020年6月22日

%H Reinhard Zumkeller，n的表，n=1..10000的a（n）</a>

%H J.-P.Allouche和J.Shallit，<a href=“网址：http://www.cs.uwaterloo.ca/~shallit/Papers/as0.ps“>k-正则序列的环</a>，预印本，理论计算机科学，98（1992），163-197。

%H J.-P.Allouche和J.Shallit，<a href=“http://dx.doi.org/10.1016/0304-3975（92）90001-V“>k正则序列的环</a>，理论计算机科学，98（1992），163-197（见例24）。

%H<a href=“/index/Bi#binary”>与n的二进制展开相关的序列的索引项</a>

%F a（n）=n-2^A000523（n）。

%计算公式：1/（1-x）*（（2x-1）/（1-x”）+和{k>=1}2^（k-1）*x^2^k）_Ralf Stephan，2003年4月18日

%F a（n）=（A006257（n）-1）/2.-_N.J.A.斯隆，2003年5月16日

%Fa（1）=0，a（2n）=2a（n），a（2n+1）=2a（n）+1_N.J.A.Sloane，2003年9月13日

%F a（n）=A062050（n）-1.-_N.J.A.Sloane，2004年6月12日

%F a（A004760（n+1））=n.-Reinhard Zumkeller_，2009年5月20日

%F a（n）=F（n-1,1），其中F（n，m）=如果n<m，则n为F（n-m，2*m）_Reinhard Zumkeller_，2009年5月20日

%对于n>1且a（1）=0的情况，F a（n）=（1-A036987（n-1））*（1+a（n-1_米哈伊尔·库尔科夫，2019年7月16日[需要验证]

%e自2013年10月17日起生效：（开始）

%e序列以不规则三角形开头：

%e 0；

%e 0,1；

%e 0，1，2，3；

%e 0,1,2,3,4,5,6,7；

%e 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15；

%e。。。

%e（结束）

%p序列（n-2^ilog2（n），n=1..1000）；#_罗伯特·伊斯雷尔（Robert Israel），2015年12月23日

%t表[n-2^楼层[Log2[n]]，{n，100}]（*_IWABUCHI Yu（u）ki_，2017年5月25日*）

%t表[FromDigits[Rest[IntegerDigits[2]]，2]，{n，100}]（*_IWABUCHI Yu（u）ki_，2017年5月25日*）

%o（哈斯克尔）

%o a053645 1=0

%o a053645 n=2*a053645n’+b，其中（n’，b）=divMod n 2

%o——Reinhard Zumkeller，2014年8月28日

%o a053645_list=concatMap（0`enumFromTo`）a000225_list

%o——Reinhard Zumkeller，2013年2月4日，2012年3月23日

%o（PARI）a（n）=n-2^（#binary（n）-1）\\查尔斯·格里特豪斯IV_，2015年9月2日

%o（岩浆）[1..70]]中的[n-2^Ilog2（n）：n；//_文森佐·利班迪（Vincenzo Librandi），2019年7月18日

%o（Python）

%o定义a（n）：返回n-2**（n.bit_length（）-1）

%o打印（[a（n）代表范围（185）中的n）]#_Michael S.Branicky_，2021年7月3日

%o（Python）

%o定义A053645（n）：返回n&（1<<n.bit_length（）-1）-1#_Chai Wah Wu_，2023年1月22日

%Y参见A000225、A000523、A002262、A004760、A006257、A006516、A030308、A036987、A053644、A062050、A083741、A160588。

%K nonn、base、easy、changed

%O 1,6型

%2000年3月22日，安里·波托姆利