|
| |
|
| A032734号 |
| 在a（n）前面和后面加一个数字的所有81种组合都是非质数。 |
|
7
|
|
|
|
2437、5620、7358、11111、13308、13332、13650、14612、19737、19817、24217、25213、26302、27971、28472、28838、29289、29542、29650、31328、33027、33170、35914、35970、36186、37977、38327、39127、39608、40078、41165、41528、42422、43277、44657、45649、47172、47382
(列表；图表；参考；听；历史；文本；内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
例子
|
2437的前缀后面跟一对来自（1,2,3,4,5,6,7,8,9）的数字永远不会产生素数，例如，'9'2437'1'=7*37*43*83。
|
|
|
MAPLE公司
|
isA032734:=进程（n）
对于k从1到9 do
对于k2从1到9 do
dgs:=[k，op（转换（n，基数，10）），k2]；
dgsn：=加（op（i，dgs）*10^（i-1），i=1..nops（dgs；
如果isprime（dgsn），则
返回false；
结束条件：；
结束do：
结束do：
返回true；
结束进程：
n从1到50000 do
如果是A032734（n），则
printf（“%d，”，n）；
结束条件：；
过滤器：=proc（n）局部d，i，j；
d： =10^（ilog10（n）+2）；
非ormap（i素数，[seq（seq（d*i+10*n+j，j=[1,3,5,7,9]），i=1..9）]）
结束进程：
|
|
|
数学
|
选择[Range[50000]，NoneTrue[Flatten[Table[FromDigits[Join[{x}，IntegerDigits[#]，{y}]，{x，9}，{y，9}]]，PrimeQ]&]（*需要Mathematica版本10或更高版本*）(*哈维·P·戴尔2018年4月7日*）
|
|
|
黄体脂酮素
|
（PARI）是_A032734号（n） =p=10^#结构（n*=10）；对于步（k=n+p，n+9*p，p，下一素数（k）>k+9|return）；1 \\M.F.哈斯勒2011年10月22日
（Python）
从sympy导入isprime
定义正常（n）：
s、 fdigs，edigs=str（n），“123456789”，“1379”
对于fdigs中的f，对于edig中的e，不返回任何（isprime（int（f+s+e））
打印（[k代表范围内的k（10**5），如果正常（k）]）#迈克尔·布拉尼基，2022年9月5日
|
|
|
交叉参考
|
|
|
|
关键词
|
非n,美好的,基础
|
|
|
作者
|
|
|
|
状态
|
经核准的
|
| |
|
|
