|
| |
|
| A109809号 |
| 当被视为十进制字符串时，Levenshtein处的素数与前一个值的距离为n。 |
|
4
|
|
|
|
2, 3, 11, 223, 1009, 22111, 100003, 2211127, 10000019, 221111257, 1000000009, 22111111123, 100000000019, 2211111111227, 10000000000051, 221111111111197, 1000000000000223, 22111111111111117, 100000000000000003, 2211111111111111211, 10000000000000000087, 221111111111111111249
(列表；图表；参考文献；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
对于正n，a（n+1）的字符串长度始终是a（n）的1+字符串长度。这个序列是无限的。
|
|
|
链接
|
|
|
|
配方奶粉
|
a（0）=2，a（n+1）=最小素数p，使得LD（a（n），p）=n，其中LD（a，B）=从a到B的Levenshtein距离，作为十进制字符串。
|
|
|
例子
|
a（1）=3，因为我们用一个替换将a（0）=2转换为3（素数）。
a（2）＝11，因为我们将a（1）＝3变换为具有1个置换加1个插入的最小素数11。
a（3）=223，因为我们用两个替换加一个插入将a（2）=11转换为素数223，并且任何较小的素数都可以用不到3个步骤从11转换。
|
|
|
数学
|
levenshtein[s_List，t_List]：=模块[{d，n=长度@秒，米=长度@t}，其中[s===t，0，n==0，m，m==0、n，s！=t，d=表[0，{m+1}，{n+1}]；d[[1，范围[n+1]]]=范围[0，n]；d[[范围[m+1]，1]]=范围[0，m]；Do[d[[j+1，i+1]]=最小值[d[[j，i+1]]+1，d[[j+1，i]]+1，d[[j，i]]+如果[s[[i]]==t[[j]]，0，1]]，{j，m}，{i，n}]；d[[-1，-1]]]；
NextPrim[n_]：=块[{k=n+1}，While[！底漆Q@k，k++]；k] ；a[0]=2；a[n_]：=a[n]=块[{q=整数位数[a[n-1]][[1]，id=整数位数@a[n-1]}，p=NextPrim[如果[q==1，楼层[199*10^（n-1）/90-1]，10^（n-1）]]；而[levenshtein[id，整数位数@p] != n、 p=NextPrim@p]；p] ；表[a[n]，{n，0，19}](*罗伯特·威尔逊v2006年1月25日*）
|
|
|
交叉参考
|
|
|
|
关键字
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
