%I#24 2017年1月31日16:25:32
%S 1,6,7,52,13222,15840121858,2728268,2989499126896,49113970,
%电话5121589220373446,551447157644135143899217052,6114538238,63,
%电话:17213767905134107139926213284101135428039221009192
%N a(N)是其二进制表示形式是以2为基数的N除数的串联的数字。
%C a(n)是A182621(n),解释为二进制数,以10为基数。第一个重复的元素是991,从15到479。
%C除1外,这个序列中不可能出现2的幂,这是一个明显的结果,对于所有n>1,a(n)必须是2的至少两个不同幂的总和_阿隆索·德尔·阿特(Alonso del Arte),2013年11月13日
%H Indranil Ghosh,n表,n=1..50000</a>
%对于p素数,F a(p)=2^(floor(log_2(p))+1)+p。此外,对于所有k>0,a(p+k)>a(p)。此外,对于所有素数p>3,a(p)<a(p-1)。
%F a(2^(m-1))=总和(k=0..m-1,2 ^((m^2+m)/2-(k^2+k)/2-1))=A164894(m).-_阿隆索·德尔·阿特(Alonso del Arte),2013年11月13日
%e 10的除数是1、2、5、10。那么以2为基数写的1、2、5、10就是1、10、101、1010。1、10、101、1010的串联是1101011010。那么a(10)=858,因为以10为基数的二进制数1101011010是858。
%t concatBits[n_]:=FromDigits[Join@@(整数位数[#,2]&&@Divisitors[n]),2];concatBits/@Range[40](*Giovanni Resta_,2010年11月23日*)
%o(Python)
%o定义A182622(n):
%o。。。。s=“”
%o。。。。对于范围(1,n+1)中的i:
%o。。。。。。。。如果n%i==0:
%o。。。。。。。。。。。。s+=箱(i)[2:]
%o。。。。return int(s,2)#_Indranil Ghosh,2017年1月28日
%o(PARI)a(n)={my(cbd=[]);fordiv(n,d,cbd=concat(cbd,binary(d)););fromdigits(cbd,2);}\\_Michel Marcus_,2017年1月28日
%Y参见A027750、A007088、A182620、A182611、A182633、A182644、A182687、A18263。
%K nonn,基础,简单
%O 1,2号机组
%2010年11月22日,A_Omar E.Pol_
%E来自Giovanni Resta的更多条款,2010年11月23日
|