|
抵消
|
1,1
|
|
评论
|
有19个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9),(8,9)。-更正人罗伯特·以色列2018年7月10日
位数是偶数,不能被3整除-罗伯特·以色列2018年7月9日
|
|
链接
|
罗伯特·以色列,n=1的n,a(n)表。。10000
|
|
枫木
|
排序(select(isprime,[seq(seq((10^(2*d)-1)/9+2*add(10^i,i=s),s=combinat:-choose([$0..(2*d-1)],d)),d=[1,2,4,5,7,8,10])))#罗伯特·以色列2018年7月9日
|
|
数学
|
Union[FromDigits/@Select[flant[Table[Tuples[{1,3},k],{k,10}],1],PrimeQ[fromdights[#]]&&Count[#,1]==Count[#,3]&]](*贾扬达·巴苏2013年5月19日*)
|
|
黄体脂酮素
|
(平价)d1=1;d2=3;k=0;a=矢量(100);对于(n=13000,B=二进制(n);L=长度(B);s=和(j=1,长度(B),B[j]);如果(L%2==0&s==L/2,C=向量(L,n,(d2-d1)*B[n]+d1);p=次方(Pol(C),x,10);如果(isprime(p),如果(k<100,k++;a[k]=p));D=矢量(L,n,d2-(d2-d1)*B[n]);q=次方(Pol(D),x,10);if(isprime(q),if(k<100,k++;a[k]=q)););a=向量(k,n,a[n]);向量排序(a)
|
|
交叉引用
|
囊性纤维变性。A087510号,A087512,A087513号.
|
|
关键字
|
基础,不
|
|
作者
|
保罗·D·汉娜和阿玛纳特·穆尔蒂2003年9月11日
|
|
状态
|
经核准的
|