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

 

标志
提示
(来自的问候整数序列在线百科全书!)
A265771型 素数的分母——仅最佳近似(POBA)为6;请参阅注释。
2, 2, 3, 3, 5, 5, 7, 7, 11, 13, 17, 17, 19, 23, 23, 29, 37, 43, 47, 47, 53, 59, 61, 67, 73, 83, 101, 103, 103, 107, 107, 109, 113, 127, 131, 137, 137, 151, 157, 163, 173, 181, 197, 199, 227, 229, 233, 239, 241, 257, 263, 269, 271, 277, 283, 283, 293, 311 (列表;图表;参考;;历史;文本;内部格式)
抵消
1,1
评论
假设x>0。素数的分数p/q是仅素数的最佳近似(POBA),并且我们写“B(x)中的p/q”,如果对于所有素数u和v,0<|x-p/q|<|x-u/v|,使得v<q,并且对于除p之外的每个素数p',|x-p/q|<|x-p'/q|。注意,对于x的一些选择,q的值有两个POBA。在这些情况下,较大的放在第一位;例如,B(3)=(7/2,5/2,17/5,13/5,23/7,19/7,…)。请参见A265759型有关相关序列的指南。
链接
例子
至6的POBA以13/2、11/2、19/3、17/3、31/5、29/5、43/7、41/7、67/11、79/13、103/17、101/17开头。例如,如果p和q是素数,q>17,那么103/17(和101/17)比p/q更接近6。
数学
x=6;z=200;p[k_]:=p[k]=素数[k];
t=表[Max[表[NextPrime[x*p[k],-1]/p[k]、{k、1、n}]]、{n、1、z}];
d=删除重复项[t];tL=选择[d,#>0&](*下部POBA*)
t=表[Min[Table[NextPrime[x*p[k]]/p[k],{k,1,n}]],{n,1,z}];
d=删除重复项[t];tU=选择[d,#>0&](*上部POBA*)
v=排序[Union[tL,tU],Abs[#1-x]>Abs[#2-x]&];
b=分母[v];s=选择[Range[Length[b]],b[[#]]==最小[Drop[b,#-1]]&];
y=表[v[[s[[n]]],{n,1,长度[s]}](*POBA,A265770型/A265771型*)
分子[tL](*A227756号*)
分母[tL](*A158015型*)
分子[tU](*A051644号*)
分母[tU](*A007693号*)
分子[y](*A222570型*)
分母[y](*A265771型*)
交叉参考
关键字
非n,压裂
作者
克拉克·金伯利2015年12月20日
状态
经核准的

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

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

上次修改时间:2024年4月23日12:27 EDT。包含371912个序列。(在oeis4上运行。)