登录
OEIS由OEIS基金会的许多慷慨捐助者.

 

标志
提示
(来自的问候整数序列在线百科全书!)
A050674号 在n的相邻数字之间插入数字“0”构成素数。 22
11, 13, 17, 19, 37, 41, 49, 53, 59, 61, 67, 71, 79, 89, 97, 107, 109, 113, 131, 133, 151, 161, 167, 179, 193, 199, 211, 217, 221, 247, 257, 259, 277, 287, 289, 293, 313, 319, 323, 337, 343, 359, 373, 377, 383, 389, 409, 457, 469, 479, 481, 493, 511, 527, 553 (列表图表参考历史文本内部格式)
抵消
1,1
链接
例子
373变为素数30703的3(0)7(0)3。
数学
(*此程序适用于Mathematica 6.0及更高版本*)
选择[Range[11,1000,2],PrimeQ[FromDigits[Riffle[IntegerDigits[#],0]]&](*T.D.诺伊2010年12月22日*)
(*以下程序已在Mathematica 5.1中进行了测试,并能正常工作*)
Reap[c=0;d=0;Do[If[MemberQ[{1,3,7,9},Mod[n,10]],id=IntegerDigits[n];Do[id[[k]]={id[[k]],d},{k,Length[id]-1}];如果[PrimeQ[FromDigits[Flatten[id]]],母猪[n];c++;如果[c>999,中断[]]],{n,11,20000}]][[2,1]](*扎克·塞多夫2010年12月22日*)
交叉参考
关键词
非n,基础
作者
帕特里克·德·格斯特,1999年8月15日
扩展
偏移设置为1乔治·菲舍尔2019年10月15日
状态
经核准的

查找|欢迎光临|维基|寄存器|音乐|地块2|演示|索引|浏览|更多|网络摄像头
贡献新序列。或评论|格式|样式表|变换|超级搜索|最近
OEIS社区|维护人OEIS基金会。

许可协议、使用条款、隐私政策。.

上次修改时间:美国东部夏令时2024年4月19日21:09。包含371798个序列。(在oeis4上运行。)