%I#6 2013年12月5日20:16:11
%S 83383838833888883833333888333388338833388333883383883833,
%电话:3833388833838388338388383838388838383383383838338838388833883833,
%电话:83338883383838383803888333383338838383833883833838383883333
%N只由数字3和数字8组成的素数,出现频率相同。
%有18个数字对可以产生这样的素数。(1,0),(7,0),(1,3),(1,4),(1,6),(1,7),(1,9),(2,3),(2,9),(3,4),(3,5),(3,7),(3,8),(4,7),(4,9),(5,9),(6,7),(7,9).
%o(PARI)/*仅由数字x和y组成的素数,出现频率相同。*/x=3;y=8;d1=x;d2=y;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);if(i素数(p),if(k<100,k++;a[k]=p));D=矢量(L,n,d2-(d2-d1)*B[n]);q=subst(Pol(D),x,10);如果(i素数(q),如果(k<100,k++;a[k]=q)););a=向量(k,n,a[n]);向量排序(a)
%Y参考A087510、A087511、A087531。
%K基,nonn
%0、1
%A _Amarnath Murthy和Paul D.Hanna,2003年9月12日
%E由_Charles R Greathouse IV_编辑,2009年10月28日
|