|
抵消
|
1,2
|
|
评论
|
|
|
链接
|
|
|
MAPLE公司
|
A139706号:=proc(n)本地a;a:=ListTools[旋转](convert(n,base,2),1);当op(-1,a)=0时,执行a:=ListTools[旋转](a,1);od:加法(op(i,a)*2^(i-1),i=1…nops(a)):结束:seq(A139706号(n) ,n=1..100)#R.J.马塔尔2008年5月4日
|
|
数学
|
表[FromDigits[RotateRight[IntegerDigits[n,2],IntegerExponent[n,2]+1],2]、{n,72}](*伊凡·内雷廷2016年5月10日*)
|
|
交叉参考
|
|
|
关键词
|
非n,基础,容易的
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|