A081092-OEIS公司

A081092美元

二元表示中素数为1的素数。

3, 5, 7, 11, 13, 17, 19, 31, 37, 41, 47, 59, 61, 67, 73, 79, 97, 103, 107, 109, 127, 131, 137, 151, 157, 167, 173, 179, 181, 191, 193, 199, 211, 223, 227, 229, 233, 239, 241, 251, 257, 271, 283, 307, 313, 331, 367, 379, 397, 409, 419, 421, 431, 433, 439, 443 (列表;图表;参考文献;听;历史;文本;内部格式)

	抵消	`1,1`
	评论	`与素数二进制数字和的素数相同。` `带素数小数位数和的素数为A046704号.` `和{a（n）<x}1/a（n；见Harman（2012）。因此序列是无限的-乔纳森·桑多2012年6月9日` `A049084号(A000120号（a（n））>0；A081091号,A000215号和A081093号是子序列。`
	链接	`莱因哈德·祖姆凯勒（Reinhard Zumkeller），n=1..10000时的n，a（n）表` `G.哈曼，数位和为素数的素数计数，J.整数序列。，第15条（2012年），第12.2.2条。`
	例子	`第15素数=47='101111'，有五个1，因此47在序列中。`
	MAPLE公司	`q： =n->isprime（n）与isprime相加（i，i=Bits[Split]（n））：` `选择（q，[1..500]美元）[]#阿洛伊斯·海因茨2023年9月28日`
	数学	`清除[BinSumOddQ]；BinSumPrimeQ[a_]：=模块[{i，s=0}，s=0；对于[i=1，i<=长度[IntegerDigits[a，2]]，s+=提取[Integer Digits[a，2]，i]；i++]；PrimeQ[s]]；lst={}；Do[p=素数[n]；如果[BinSumPrimeQ[p]，AppendTo[lst，p]]，{n，4！}]；第一次(弗拉基米尔·约瑟夫·斯蒂芬·奥尔洛夫斯基2009年4月6日）` `选择[Prime[Range[100]]，PrimeQ[Apply[Plus，Integer Digits[#，2]]&](乔纳森·桑多2012年6月9日）`
	黄体脂酮素	`（哈斯克尔）` `a081092 n=a081092_list！！（n-1）` `a081092_list=过滤器（==1）。a010051'）a052294_列表` `--莱因哈德·祖姆凯勒2012年11月16日` `（PARI）列表a（nn）={对于素数（p=2，nn，if（i素数（hammingweight（p）），打印1（p，“，”）；）；}\\米歇尔·马库斯2015年1月16日` `（Python）` `从sympy导入isprime` `def ok（n）：返回isprime（n.bit_count（））和isprime（n）` `打印（[k代表范围（444）中的k，如果正常（k）]）#迈克尔·布拉尼基2023年12月27日`
	交叉参考	`囊性纤维变性。A000040型,A000120号,A046704号,A081093号.` `的后续A052294号.` `上下文中的序列：A038604型 A155026号 A295705型A291360型 A269326型 A163422号` `相邻序列：A081089号 A081090型 A081091号A081093号 A081094号 A081095号`
	关键字	`非n,基础`
	作者	`莱因哈德·祖姆凯勒2003年3月5日`
	状态	`经核准的`