搜索： a089395-编号：a089398
|
| |
| |
| |
|
|
|
抵消
|
0,2
|
|
|
链接
|
|
|
|
例子
|
a（3）=256是最小的3位数，使得2*56+1=113、25*6+1=151和256+1=257都是素数。
|
|
|
MAPLE公司
|
with（组合）：ds:=进程局部j:RETURN（add（s[j]*10^（j-1），j=1..nops（s））：结束：对于从1到7的d do sch:=[seq（[1，op（i），d+1]，i=[[]，seq（[j]，j=2..d）]）：对于从10^（d-1）到10^d-1的n do sn:=转换（n，base，10）：fl:=0：对于sch do m中的s：=mul（j，j=[seq]（ds（sn[s[i]..s[i+1]-1]），i=1..nops（s）-1）]）+1：如果不是isprime（m）那么fl:=1：break fi od：如果fl=0，那么printf（“%d，”，n）：break fi od od:#C罗纳尔多
|
|
|
交叉参考
|
|
|
|
关键字
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
由C·罗纳尔多更正和扩展（aga_new_ac（AT）hotmail.com），2004年12月25日
|
|
|
状态
|
经核准的
|
| |
|
|
| |
| |
| |
|
|
|
抵消
|
1,1
|
|
|
链接
|
|
|
|
MAPLE公司
|
with（combint）：ds:=进程局部j:RETURN（add（s[j]*10^（j-1），j=1..nops（s））：结束：对于从1到6的d do sch:=[seq（[1，op（i），d+1]，i=[]，seq（[j]，j=2..d）]）：对于从10^d-1到10^（d-1）的n do sn:=转换（n，base，10）：fl:=0：对于sch中的s do m:=mul（j，j）=[seq（ds（sn[s[i]..s[i+1]-1]），i=1..nops（s）-1）]）+1：如果不是isprime（m）则fl:=1:break fi od：如果fl=0，则printf（“%d，”，n）：break fi od：#C.罗纳尔多
|
|
|
交叉参考
|
|
|
|
关键字
|
基础,非n
|
|
|
作者
|
|
|
|
扩展
|
更多来自C.Ronaldo（aga_new_ac（AT）hotmail.com）的条款，2004年12月25日
|
|
|
状态
|
经核准的
|
| |
|
|
| |
|
|
A089696号
|
| 数字k，这样通过在数字之间放置尽可能多的“*”号，然后再加1得到的数字在每种情况下都会产生一个素数：让abc。。是k的数字，然后是abc+1、a*bc+1、ab*c+1、b*c+1。。。必须都是质数。 |
|
+10
1
|
|
|
|
1, 2, 4, 6, 12, 16, 22, 28, 36, 52, 58, 66, 82, 112, 136, 166, 256, 352, 556, 562, 586, 616, 652, 658
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
|
抵消
|
0,2
|
|
|
评论
|
|
|
|
链接
|
|
|
|
例子
|
256是一个成员256+1，2*56+1，25*6+1，2x5*6+1都是质数。
|
|
|
MAPLE公司
|
with（combint）：ds:=进程局部j:RETURN（add（s[j]*10^（j-1），j=1..nops（s））：结束：对于从1到6的d do sch:=[seq（[1，op（i），d+1]，i=choose（[seq，j，j=2..d）]）]：对于从10^（d-1）到10^d-1的n do sn:=转换（n，base，10）：fl:=0：对于sch do m中的s：=mul（j，j=[seq]ds（sn[s[i]..s[i+1]-1]），i=1..nops（s）-1）]）+1：如果不是isprime（m）则fl:=1:break fi od:如果fl=0，则打印f（“%d，”，n）fi od:#C.罗纳尔多
|
|
|
交叉参考
|
|
|
|
关键字
|
基础,更多,非n
|
|
|
作者
|
|
|
|
扩展
|
由C·罗纳尔多更正和扩展（aga_new_ac（AT）hotmail.com），2004年12月25日
|
|
|
状态
|
经核准的
|
| |
|
搜索在0.006秒内完成
|
