OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A278909型 二进制史密斯数:复合数n,即n的位之和=n的素因子的位之总和(以重数计算)。 11
15, 51, 55, 85, 125, 159, 185, 190, 205, 215, 222, 238, 246, 249, 253, 287, 303, 319, 374, 407, 438, 442, 469, 471, 475, 489, 494, 501, 507, 591, 623, 639, 670, 679, 687, 699, 730, 745, 755, 763, 765, 771, 799, 807, 822, 830, 843, 867, 890, 893, 917, 923, 925, 935, 939, 951, 970, 973, 979, 986, 989, 995, 1010, 1015, 1017, 1020, 1023, 1135, 1167, 1203, 1243 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
二进制等价物A006753号以及A176670号.(由于位只能是0或1,因此具有相等的位和在逻辑上等同于具有相同的非零位。)
10^4之前有615个术语,10^5之前有6412个术语,6,66369,10^6之前有630106,10^7之前有6268949~10^8之前有62159262~10^9,10^10之前有596587090-查尔斯·格里特豪斯四世2016年12月9日
链接
例子
a(1)=15,因为二进制中的15(1111)具有与其素因子(11和101)相同的1比特数。
数学
选择[Range@1250,And[CompositeQ@#,DigitCount[#,2,1]=Total@Flatten@Apply[DigitCount[#,2,1]&/@ConstantArray[#1,#2]&,FactorInteger@#,1]&](*迈克尔·德弗利格2016年12月2日*)
黄体脂酮素
(SageMath)
定义numfactorbits(x):
如果(x<2):
返回0;
s=0;
f=列表(系数(x));
#确保numfactorbits(x)和bin(x)的不等式。如果x是素数,count(“1”)
如果((长度(f)==1)&(f[0][1]==1
返回0;
对于范围内的c(len(f)):
s+=箱子(f[c][0]).计数(“1”)*f[c][1]
返回s;
计数器=2
索引=1
而(指数<=10000):
if(numfactorbits(counter)==bin(counter).count(“1”)):
打印(str(索引)+“”+str(计数器))
指数+=1;
计数器+=1;
(PARI)是(n)=my(f=因子(n)[,1]~,expo=因子(n)[,2]~,v=[],s=0);对于(k=1,#f,while(expo[k]>0,expo[k]--;v=concat(v,f[k]));对于(k=1,#v,v[k]=二进制(v[k]));我的(w=[]);对于(y=1,#v,w=concat(w,v[y]));如果(vecsum(w)==vecsum,二进制(n)),则返回(1),返回(0))
术语(n)=我的(i=0);对于复合(c=1,如果(是(c),打印1(c,“,”);i++;如果(i==n,断开))
/*打印最初的70个条款如下:*/
术语(70)\\费利克斯·弗罗利奇(Felix Fröhlich)2016年12月1日
(PARI)是(n)=my(f=因子(n),t=#f~);(t>1||(t==1&f[1,2]>1))&&hammingweight(n)==总和(i=1,t,hammingweight(f[i,1])*f[i、2])\\查尔斯·格里特豪斯四世2016年12月2日
(Python)
来自sympy导入因子
def-sbd(n):返回bin(n).count('1')
定义正常(n):
f=因子(n)
返回和(f[p]对于f中的p)>1,sbd(n)==和(sbd(p)*f[p]对f中的p)
打印(列表(过滤器(正常,范围(1244)))#迈克尔·布拉尼基2021年4月22日
交叉参考
关键词
非n基础容易的
作者
伊利·戈尔登2016年11月30日
状态
已批准

查找|欢迎光临|维基|注册|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年6月16日01:38。包含373412个序列。(在oeis4上运行。)