登录
OEIS由支持OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A048986号 以2为底的主素数:以n开头的素数,(以2为基)连接其素因子(A048985号); 重复,直到达到素数(或者-1,如果没有达到素数)。答案以10为基数。 6
1, 2, 3, 31, 5, 11, 7, 179, 29, 31, 11, 43, 13, 23, 29, 12007, 17, 47, 19, 251, 31, 43, 23, 499, 4091, 4091, 127, 4091, 29, 127, 31, 1564237, 59, 4079, 47, 367, 37, 83, 61, 383, 41, 179, 43, 499, 4091, 4091, 47, 683, 127, 173, 113, 173, 53, 191, 4091 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
a(1)=1按惯例。
第一个未知的二进制主素数是a(2295)-伊利·戈尔登2017年1月9日
链接
Patrick De Geest,主页素材
例子
4=2*2->1010=10=2*5->10101=21=3*7->11111=31=素数。
数学
f[n_]:=模[{fi},如果[PrimeQ[n],n,fi=FactorInteger[n];表[First[#],{Last[#]}]&/@fi//平展//整数位数[#,2]&//平展//FromDigits[#,2]&]];a[1]=1;a[n_]:=时间约束的[FixedPoint[f,n],1]/$中止->-1;数组[a,55](*Jean-François Alcover公司2016年1月1日*)
黄体脂酮素
(SageMath)
def digitLen(x,n):
r=0
当(x>0):
x//=n
r+=1
返回r
定义concatPf(x,n):
r=0
f=列表(系数(x))
对于范围内的c(len(f)):
对于范围(f[c][1])中的d:
r*=(n**digitLen(f[c][0],n))
r+=f[c][0]
返回r
定义马力(x,n):
x1=concatPf(x,n)
而(x1!=x):
x=x1
x1=连接Pf(x1,n)
返回x
基数=2
索引=2
而(指数<=1344):
打印(str(索引)+“”+str(hp(索引,基数))
指数+=1
(Python)
从sympy导入因子,isprime
定义f(n):
如果n==1:返回1
return int(“”.join(bin(p)[2:]*e代表p,e在factorint(n).items()中),2)
定义a(n):
如果n==1:返回1
虽然不是质数(n):n=f(n)
返回n
打印([a(n)代表范围(1,56)中的n])#迈克尔·布拉尼基2022年10月7日
交叉参考
囊性纤维变性。A048985号,A037274号,A049065号.
关键字
非n,基础,美好的
作者
迈克尔·格林瓦尔德(mbgreen(AT)central.cis.upenn.edu)
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年6月25日18:08。包含373707个序列。(在oeis4上运行。)