登录
OEI由许多慷慨的捐赠者给OEIS基金会.

 

标志
提示
(问候来自整数序列在线百科全书!)
A087533号 仅由数字4和7组成的素数以相等的频率出现。

%我

%S 4747447747774447444774774744474747474747447477474474774744747747,

%电话474744477747747447747474447747747447744774444774777447474477,

%U 7744744747774474744777474444777747447447777444474444777774744444777774774444744777777744447474777477

%N个仅由数字4和7组成的素数,出现频率相等。

%有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),(4,7),(4,9),(5,9),(6,7),(7,9)。

%H Harvey P.Dale,<a href=“/A087533/b087533.txt”>n,a(n)表格,n=0..10000</a>

%t Table[Select[fromdights/@Permutations[PadRight[{},2n,{4,7}]],PrimeQ],{n,7}]//扁平//排序(*u Harvey P.Dale_2016年5月5日*)

%o(PARI)/*仅由数字x和y组成的素数,出现频率相同。*/x=4;y=7;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);如果(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)

%Y比照A087510、A087511、A087532。

%K基,非N

%O 0,1

%A·保罗·D·汉娜和阿玛纳特·穆尔蒂,2003年9月12日

%2009年10月28日,查理斯·R·格雷特豪斯四世编辑

%E由哈维·P·戴尔修正,2016年5月5日

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

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

上次修改日期:2022年8月18日21:33。包含356215个序列。(运行在oeis4上。)