%I#48 2019年7月28日16:51:54

%S 1,2,2,3,3,6,4,4,8,8,12,12,24,5,5,10,10,15,15,30,20,40,40，

%电话：60,60120120,6,6,12,12,18,18,36,36,24,48,48,72,72144144,30,30，

%U 60,60,90,9018018020120240240360360720,7,7,14,14,21,21

%N如果N=2^k-1，则a（N）=k+1，否则a（N）=（A000523（N）+1）*a（A053645（N））。

%C序列中每个n>1发生2*A045778（n）次。

%如果2^k>n+1，则Cf（n+2^k）=（k+1）*f（n）_罗伯特·伊斯雷尔（Robert Israel），2016年4月25日

%C如果n的二进制指数（A048793的第n行）是其反向二进制展开中的位置1，则a（n）是n+1的所有二进制指数的乘积。n的二元指数为A000120（n），其和为A029931（n）。其平均值为A326699（n）/A326700（n）_Gus Wiseman_，2019年7月27日

%H Peter Kagey，n的表，a（n）表示n=0..10000</a>

%联邦政府：（prod（k>=1，1+k*x^（2^（k-1）））-1）/x.-_Vladeta Jovovic_，2005年11月8日

%Fa（n）是2*n+2的二元展开中的指数的乘积_Peter Kagey_，2016年4月24日

%p f：=proc（n）局部L；

%p L：=转换（2*n+2，基数，2）；

%p转换（sub（0=NULL，zip（`*`，L，[$0..nops（L）-1]），`*`）；

%p端程序：

%p映射（f，[$0..100]）；#_罗伯特·伊斯雷尔（Robert Israel），2016年4月25日

%t系数表[（乘积[1+k×^（2^（k-1）），{k，7}]-1）/x，x]（*迈克尔·德弗里格，2016年4月8日*）

%t bpe[n_]：=连接@@Position[Reverse[IntegerDigits[n，2]]，1]；表[Times@@bpe[n+1]，{n，0100}]（*_Gus Wiseman_，2019年7月26日*）

%o（方案：）（定义（A096111 n）（cond（（pow2？（+n 1））（+2（A000523 n））））（其他（*（+1（A000523n））（A096111n））

%o（定义（功率2？n）（和（>n 0）（零？（A004198bi n（-n 1））））

%o（PARI）

%o N=166；q='q+O（'q^N）；

%o gf=（prod（n=1,1+细胞（log（n）/log（2）），1+n*q^（2^（n-1）））-1）/q；

%o Vec（gf）

%o/*_Joerg Arndt_，2012年10月6日*/

%A096115的Y置换，即a（n）=A096115（A122198（n+1））[注意不同的起始偏移]。二等分：A121663。参见A096113、A052330。

%Y参考A029931。

%Y参见A000120、A034797、A048793、A070939、A291166、A326031、A326672、A326663。

%K nonn公司

%0、2

%A _Amarnath Murthy，2004年6月29日

%E由_Antti Karttune_编辑、扩展和添加的方案代码，2006年8月25日