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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A276707型 条款数量A069090型正好有n个数字。 2
4, 12, 60, 381, 2522, 19094, 151286, 1237792, 10354144, 88407746, 766869330 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
链接
MAPLE公司
A276707型:=进程(n)
局部a,k;
a:=0;
k:=下一素数(10^(n-1));
而k<10^n do
如果是A069090(k),则
a:=a+1;
结束条件:;
k:=下一素数(k);
结束do:
a;
结束进程:#R.J.马塔尔2016年12月15日
黄体脂酮素
(perl/tcsh)“bzcatA069090型.b.txt.bz2|perl-anle'打印长度($F[1])'|sort|uniq-c“withhttps://github.com/barrycarter/bcapps/blob/master/QUORA/A069090型.b.txt.bz2
(Python)
从sympy导入primerage,isprime
定义正常(p):
s=str(p)
如果长度==1:返回True
对于范围(1,len(s))中的i,返回all(而不是isprime(int(s[:i]))
定义a(n):返回和(质数范围内p的ok(p)(10**(n-1),10**n))
打印([a(n)代表范围(1,7)中的n])#迈克尔·布拉尼基2021年7月3日
(Python)#跳过错误前缀的更快版本
从sympy导入isprime,nextprime
定义a(n):
如果n=1:返回4
p、 c=下一素数(10**(n-1)),0
当p<10**n时:
s、 失败=str(p),错误
对于范围(1,n)中的i:
ti=整数(s[:i])
如果isprime(ti):失败=i;打破
如果失败:p=下一个素数((ti+1)*10**(n-i))
否则:p,c=下一素数(p),c+1
返回c
打印([a(n)代表范围(1,8)中的n])#迈克尔·布拉尼基2021年7月3日
交叉参考
囊性纤维变性。A069090型.
关键词
非n,基础,更多
作者
巴里·卡特2016年9月15日
扩展
a(9)-a(11)来自迈克尔·布拉尼基2021年7月3日
状态
已批准

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

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

上次修改时间:美国东部夏令时2024年5月22日21:38。包含372758个序列。(在oeis4上运行。)