登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A345396型 a(n)是最小素数p,因此{p,p^2,…,p^n}都是以2为基数的数字平衡数(A031443号). 1
2, 12049, 52673, 937253, 1000099, 3844790441, 62911443401, 1052000152157 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
a(9)>2.5*10^12(如果存在)。
链接
例子
a(1)=2,因为2是数字平衡的:它的二进制表示形式10具有相同的0和1的数目。
a(2)=12049,因为12049和12049^2都是数字平衡的:1204910111100010001的二进制表示有7个0和7个1,12049^2100011100111100100001的二进制表示则有14个0和14个1。
数学
balQ[n_]:=模块[{d=整数位数[n,2],m},EvenQ@(m=长度@d)&&Count[d,1]==m/2];f[p_]:=模块[{e=0,r=p},而[balQ[r],r*=p;e++];e] ;mx=5;s=表[0,{mx}];c=0;p=2;而[c<mx,k=f[p];Do[如果[s[i]]==0,s[[i]]=p;c++],{i,1,k}];p=下一素数[p]];
黄体脂酮素
(Python)
从itertools导入计数,islice
从sympy导入isprime
从sympy.utilities.可交互导入multiset_permutations
定义平衡(n):b=箱(n)[2:];return b.count(“0”)==b_count((“1”)
定义A066196gen():
滤波器的产量(isprime,(int(“1”+“”.join(p),2)for n in count(1)for p in multist_permutations(“0”*n+“1”*(n-1)))
定义a(n):
对于A066196gen()中的p:
如果所有(i在范围(2,n+1)内平衡(p*i):
返回p
打印([a(n)代表范围(1,6)中的n])#迈克尔·布拉尼基2022年5月15日
交叉参考
参见。A345397型.
关键词
非n,基础,更多
作者
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年4月24日19:06。包含371962个序列。(在oeis4上运行。)