OEIS哀悼西蒙斯感谢西蒙斯基金会支持包括OEIS在内的许多科学分支的研究。
登录
OEIS由OEIS基金会的许多慷慨捐赠者.

 

徽标
提示
(来自的问候整数序列在线百科全书!)
A051169号 最小数m,使得2*m-p是前n个素数p的合成数。 3
3、6、15、49、49、49、110、154、154、278、278、278、496、496、496、1321、1321、1321、2686、2686、2686、2686、2686、2686、3713、3713、3713、21766、21766、21766、21766、21766、21766、21766 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
参考文献
由罗切斯特理工学院的彼得·安德森计算。
链接
Paul S.Bruckman和T.D.Noe,n=1..974时的n,a(n)表
例子
a(2)=6,因为2*6-2=10和2*6-3=9是复合的。
数学
a[n_]:=a[n]=捕捉[For[m=2,True,m++,If[And@@(!PrimeQ[2*m-#]&)/@Prime/@Range[n],Throw[m]]];表格[打印[a[n]];a[n],{n,1,46}](*Jean-François Alcover公司2012年7月17日*)
模[{nn=50,prs},prs=Prime[nn]];表[SelectFirst[Range[50000],AllTrue[Table[2#-p,{p,Take[prs,n]}],CompositeQ]&],{n,nn}]](*程序使用Mathematica版本10*中的AllTrue函数)(*哈维·P·戴尔2015年3月18日*)
黄体脂酮素
(哈斯克尔)
a051169 n=水头[m|m<-[2..],
所有(==0)$map(a010051'.(2*m-))$take n a000040_list]
交叉参考
请参见A051610号A116111号以备记录。囊性纤维变性。A025017级.
囊性纤维变性。A010051型,A000040型.
关键词
美好的,非n
作者
保罗·S·布鲁克曼(pbruckman(AT)hotmail.com)
扩展
Paul S.Bruckman提供的更多条款,2007年1月20日
编辑人N.J.A.斯隆2007年4月14日、2007年5月4日、2008年6月10日
状态
经核准的

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

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

上次修改时间:美国东部夏令时2024年5月14日03:59。包含372528个序列。(在oeis4上运行。)