OEIS哀悼
西蒙斯
感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由
OEIS基金会的许多慷慨捐赠者
.
提示
(来自的问候
整数序列在线百科全书
!)
A087533号
仅由数字4和数字7组成的素数以相同的频率出现。
三
47、47447747、77474447、4447747747、4744477747、4744747477、4744747747、4747444777、4747747447、4774744477、7444477477、7447474477、7744744747、7744747447、7747444477、7747447447
(
列表
;
图表
;
参考
;
听
;
历史
;
文本
;
内部格式
)
抵消
0,1
评论
有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).
链接
哈维·P·戴尔,
n=0..10000时的n,a(n)表
数学
表[Select[FromDigits/@Permutations[PadRight[{},2n,{4,7}]],PrimeQ],{n,7}]//扁平//排序(*
哈维·P·戴尔
2016年5月5日*)
黄体脂酮素
(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=subst(Pol(D),x,10);
如果(i素数(q),如果(k<100,k++;a[k]=q)););
a=向量(k,n,a[n]);
向量排序(a)
交叉参考
囊性纤维变性。
A087510号
,
A087511号
,
A087532美元
.
上下文中的序列:
A224468型
A353697飞机
A328364型
*
A292071型
A292707型
A292967型
相邻序列:
A087530号
A087531号
A087532美元
*
A087534号
A087535号
A087536号
关键词
基础
,
非n
作者
保罗·D·汉纳
和
阿玛纳斯·穆尔西
2003年9月12日
扩展
编辑人
查尔斯·格里特豪斯四世
2009年10月28日
更正人
哈维·P·戴尔
2016年5月5日
状态
经核准的
查找
|
欢迎光临
|
维基
|
注册
|
音乐
|
地块2
|
演示
|
索引
|
浏览
|
更多
|
网络摄像头
贡献新序列。
或评论
|
格式
|
样式表
|
变换
|
超级搜索
|
最近
OEIS社区
|
维护人
OEIS基金会。
许可协议、使用条款、隐私政策。
.
上次修改时间:2024年5月25日14:54 EDT。
包含372791个序列。
(在oeis4上运行。)