|
|
|
|
4, 12, 60, 381, 2522, 19094, 151286, 1237792, 10354144, 88407746, 766869330
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
链接
|
|
|
MAPLE公司
|
局部a,k;
a:=0;
k:=下一素数(10^(n-1));
而k<10^n do
如果是A069090(k),则
a:=a+1;
结束条件:;
k:=下一素数(k);
结束do:
a;
|
|
黄体脂酮素
|
(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日
|
|
交叉参考
|
|
|
关键词
|
非n,基础,更多
|
|
作者
|
|
|
扩展
|
|
|
状态
|
已批准
|
|
|
|