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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A058055型 a(n)是最小的正数m,因此m^2+n是下一个素数>m^2。 5
1, 3, 8, 5, 12, 11, 18, 51, 82, 49, 234, 23, 42, 75, 86, 231, 174, 107, 288, 63, 80, 69, 102, 325, 166, 765, 128, 143, 822, 727, 276, 597, 226, 835, 702, 461, 254, 693, 592, 797, 1284, 349, 370, 2337, 596, 645, 3012, 1033, 590, 4083, 1490, 757, 882, 833, 1668 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,2
评论
素数在A058056号.
链接
扎克·塞多夫,n=1..500时的n,a(n)表(前400个术语来自T.D.Noe)
配方奶粉
a(n)=Min{m>0|m^2+n是m^2}之后的下一个素数。
A053000型(a(n))=n-扎克·塞多夫2013年4月12日
例子
n=6:a(6)=11,11^2+6是127,素数;n=97:a(97)=2144和2144^2+97=4596833,是m^2+97形式的最小素数。
MAPLE公司
对于m从1到10^5 do
r: =下一素数(m^2)-m^2;
如果未赋值(R[R]),则R[R]:=m end if;
结束do:
J: =映射(op,{索引(R)}):
N: =最小值({$1..J[-1]}减去J)-1:
[seq(R[j],j=1..N)]#罗伯特·伊斯雷尔2012年8月10日
数学
nn=100;t=表[0,{nn}];发现=0;m=0;而[发现<nn,m++;k=NextPrime[m^2]-m^2;如果[k<=nn&&t[[k]]==0,t[[k]]=m;找到++]];吨(*T.D.诺伊2012年8月10日*)
程序
(鼠尾草)
R={}#之后罗伯特·伊斯雷尔的Maple脚本。
对于m in(1..2^12):
r=下一素数(m^2)-m^2
如果r不在r:r[r]=m
L=已排序(R.keys())
对于(1..len(L)-1)中的i:
如果L[i]!=L[i-1]+1:断裂
[R[k]代表k in(1..i)]#彼得·卢什尼2012年8月11日
交叉参考
囊性纤维变性。A053000型,A070316型,A070317号.
请参见A085099型,A215249型用于其他版本。
关键词
非n
作者
拉博斯·埃利默2000年11月20日
扩展
定义修正人扎克·塞多夫,2008年3月3日,再次由富兰克林·T·亚当斯-沃特斯2012年8月10日
状态
已批准

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

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

上次修改时间:2024年4月25日05:18 EDT。包含371964个序列。(在oeis4上运行。)