|
| |
|
| A089770号 |
| 不包含素子串的最小n位素数，如果不存在这样的数，则为0。 |
|
3
|
|
|
|
2, 11, 101, 1009, 10009, 100049, 1000081, 10000169, 100000049, 1000000009, 10000000069, 100000000069, 1000000000091, 10000000000099, 100000000000099, 1000000000000091, 10000000000000069, 100000000000000049
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
对于n>1，a（n）以1或9结尾，而其他数字可以是0、1、4、6、8或9-罗伯特·伊斯雷尔，2017年12月9日
|
|
|
链接
|
|
|
|
例子
|
a（3）=149是一个术语，因为1，4，9，14，49都是非聚合物。199不是成员，因为19是质数。
|
|
|
MAPLE公司
|
N： =1000:#获得项，直到a（N）>10^（N-1）+10*N+9
过滤器1:=进程（x）
局部k，j；
对于k从0到ilog10（x）do
对于j从k到ilog10（x）+1 do
如果isprime（floor（（x mod 10^j）/10^k）），则返回false fi；
日期：
真的
结束进程：
十： =选择（过滤器1，[seq（seq（10*i+j，j=[1,9]），i=0..N）]）：
过滤器2:=进程（p，x）
局部k，j；
如果不是isprime（p），则返回false fi；
对于k从1到ilog10（x）+1 do
如果isprime（floor（p/10^k）），则返回false fi
od；
真；
结束进程：
从1到n do
发现：=false；
对于x中的x do
p： =10^（n-1）+x；
如果过滤器2（p，x），则A[n]：=p；发现：=true；破译fi；
日期：
如果未找到，则断开fi
日期：
|
|
|
交叉参考
|
|
|
|
关键字
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
