整数序列在线百科全书（OEIS）

修订历史记录A117891号

（粗体、蓝色下划线文本是附加;褪色的红色下划线文本是删除.)
显示条目1-10|较旧的更改

A117891号

对n进行编号，使n的二进制表示中的非前导0的数量和n的二进制表达中的1的数量除以n。
(历史;已发布版本)

#18通过彼得·卢什尼美国东部时间2020年1月17日星期五03:31:56

状态

提出

经核准的

#17通过米歇尔·马库斯2020年1月17日星期五01:56:39 EST

状态

编辑

提出

#16通过米歇尔·马库斯2020年1月17日星期五01:56:36 EST

黄体脂酮素

（C） #include<stdio.h>int main（int argc，char*argv[]）{for（int n=1；n<500；n++）{int digs[2]；int nshifted=n；digs[0]=digs[1]=0；while（nshifted）{digs[nshiftded&1]++；nshifted>>=1；}if n）；}}- _/* _R.J.Mathar，2006年4月3日 */

状态

提出

编辑

#15通过罗伯特·伊斯雷尔2020年1月16日星期四22:21:37 EST

状态

编辑

提出

#14通过罗伯特·伊斯雷尔美国东部时间2020年1月16日星期四22:21:31

关键词

容易的,非n,改变,基础

#13通过罗伯特·伊斯雷尔2020年1月16日星期四22:21:10 EST

交叉参考

囊性纤维变性。A049445号,A117890型. 包括 A001146号.

#12通过罗伯特·伊斯雷尔2020年1月16日星期四美国东部标准时间22:18:23

链接

Robert Israel，<a href=“/A117891号/b117891.txt“>n，n=1..10000时的a（n）表</a>

MAPLE公司

过滤器：=proc（n）局部L，x，m；

五十： =换算（n，基数，2）；

x： =转换（L，`+`）；

m： =nops（L）；

x<m且n mod x=0且n mod（m-x）=0

结束进程：

选择（过滤器，[1..1000]美元）；

状态

经核准的

编辑

#11通过查尔斯·格里特豪斯四世2014年4月9日星期三10:13:41 EDT

作者

勒罗伊·奎特 , 2006年3月30日

讨论

2009年4月3日

10:13

OEIS服务器: https://oeis.org/edit/global/2147

#10通过N.J.A.斯隆2014年2月5日星期三美国东部标准时间20:18:18

作者

_勒罗伊·奎特 _ 2006年3月30日

讨论

2月5日星期三

20:18

OEIS服务器: https://oeis.org/edit/global/2118

#9通过查尔斯·格里特豪斯四世2013年11月21日星期四12:48:57 EST

数学

bdQ[n_]：=模块[｛idn2=整数位数[n，2]，x，y｝，x=计数[idn2，1]；y=计数[idn2，0]；如果[x==0，x=n+1]；如果[y==0，y=n+1]；和@@可除[n，{x，y}]]；选择[Range[500]，bdQ](*发件人 _哈维·P·戴尔, _, 2012年1月22日*）

讨论

11月21日星期四

12:48

OEIS服务器: https://oeis.org/edit/global/2062