检验过的
经核准的
提出
编辑
f: =proc(n)局部x,m;
如果n mod 3=0且n<>3,则返回-1 fi;
x: =n;
对于从0到10^4的m do
如果isprime(x),则返回m-fi;
x: =10*x+9
od;
失败
结束进程:
地图(f,[1..200]美元)#罗伯特·伊斯雷尔,2024年6月5日
最小数字m,以便(n个+1)*10^米-1 (我.e(电子)., n个跟着 通过 具有 9个月附加) 生成素数,如果它总是生成一个复合数,则为-1。
M.F.哈斯勒:完成(虽然为了搜索目的,我留下了“n后面附加了m个9”,因为这就是我的想法……)
M.F.哈斯勒:也许我们应该在NAME中的“m”后面加上“>=0”,并且:将“n follow by m nines”替换为“n with m nines appended”?“追随”对我来说似乎不太合适。其他人怎么看?
M.F.哈斯勒(人们可以猜测“followed”的意思,但如果我们能用更好的方式来表达,不是吗?)
罗伯特·伊斯雷尔:你可以简单地说10^m*(n+1)-1。
M.F.哈斯勒:是的。。。
定义编辑人M.F.哈斯勒,2024年6月5日
最小的数m,使得n后面紧跟着m九,得到一个素数 , 或-1,如果不 解决方案 存在 或 有 已经 建立 对于 n个这 将 总是 产量 一 混合成的 数.
(PARI)适用({A090465号(n,LIM=500)=n%3&&对于(m=0,LIM,ispseudoprime(n)&&返回(m);n=n*10+9)-(n>3)},[1..55])\\返回值-1表示(n)=-1,或者,如果n%3>0,则可能是(n)>LIM,搜索限制作为第二个(可选)参数给定-M.F.哈斯勒,2024年6月5日
囊性纤维变性。A083747号(王尔德素数,即相同的操作使用一个),A090464美元 (使用 七), A090584号(使用三个), A090464号 (使用 七).
M.F.哈斯勒:铃木Toshitaka Suzuki正确地停在4419,在未知的4420之前。我删除了定义/NAME中的“或尚未找到”,我们不需要依赖时间的序列。
铃木敏中,<a href=“/A090465号/b090465号_1.txt“>n,a(n)表,n=1..4419</a>