|
|
A050249号 |
| 弱素数(改变任何一个十进制数字总是产生一个复合数)。也称为数字精细素数。 |
|
19
|
|
|
294001, 505447, 584141, 604171, 971767, 1062599, 1282529, 1524181, 2017963, 2474431, 2690201, 3085553, 3326489, 4393139, 5152507, 5564453, 5575259, 6173731, 6191371, 6236179, 6463267, 6712591, 7204777, 7469789, 7469797
(列表;图表;参考;听;历史;文本;内部格式)
|
|
|
抵消
|
1,1
|
|
评论
|
|
|
参考文献
|
迈克尔·菲拉塞塔(Michael Filaseta)和杰里米亚·索思威克(Jeremiah Southwick),在改变任意数字数学后,素数变成复合数。公司。(2021)第90卷,979-993。doi:10.1090/com/3593
|
|
链接
|
乔恩·肖恩菲尔德,n=1..10000时的n,a(n)表(克劳斯·布罗克豪斯(Klaus Brockhaus)的第1..1317条,珍妮·马尔克·雷伯特(Jean-Marc Rebert)的第1318.3167条)。
Michael Filaseta和Jacob Juillerat,数字上非常精细的连续素数,arXiv:2101.08898[math.NT],2021。
欧内斯特·希布斯,素数的分量相互作用,《国会科技大学博士论文》(2022年),见第33页。
杰克逊·霍珀和保罗·波拉克,数字精细素数,arXiv:11510.03401[math.NT],2015年。
特伦斯·陶,关于素性检验和小数展开的一点注记,arXiv:0802.3361[math.NT],2008-2010;《澳大利亚数学学会杂志》91:3(2011),第405-413页。
|
|
数学
|
fQ[n_]:=块[{d=整数位数@n,t={}},Do[AppendTo[t,FromDigits@ReplacePart[d,i->#]&/@DeleteCase[Range[0,9],x_/;x==d[[i]]],{i,长度@d}]!AnyTrue[Flatten@t,PrimeQ]];选择[Prime@Range[10^5],fQ](*迈克尔·德弗利格2015年11月10日,第10版*)
|
|
黄体脂酮素
|
(岩浆)IsA118118:=函数(n);D: =整数(n);返回[1..#D]中的所有{k,j>:k,[0..9]|j eq D[k]或不是IsPrime(Seqint(S)),其中S:=插入(D,k,k,[j])};端函数;[p:p在PrimesUpTo(8000000)|IsA118118(p)中]//克劳斯·布罗克斯2011年2月28日
(PARI)isokp(n)={v=数字(n);for(k=1,#v,w=v;for(j=0,9,if(j!=v[k],w[k]=j;ntest=subst(Pol(w),x,10);if(isprime(ntest),return(0););)
列表(nn)={forprime(p=2,nn,if(isokp(p),print1(p,“,”));}\\米歇尔·马库斯2015年12月15日
(Python)
从sympy导入isprime
def h1(n):#n的hamming距离1邻居
s=str(n);d=“0123456789”;L=长度
如果c=第[i]节)
def ok(n):如果k=n)
打印([k表示范围内的k(10**6),如果ok(k)])#迈克尔·布拉尼基2022年6月19日
|
|
交叉参考
|
|
|
关键词
|
非n,基础
|
|
作者
|
|
|
扩展
|
|
|
状态
|
经核准的
|
|
|
|