|
| |
|
| A265790型 |
| 下素数的分子-仅最佳逼近（POBA）到sqrt（8）；请参阅注释。 |
|
7
|
|
|
|
5, 13, 19, 31, 223, 359, 461, 659, 6163, 8539, 8737, 25453, 32377, 35839
(列表;图表;参考文献;听;历史;文本;内部格式)
|
|
|
|
抵消
|
1,1
|
|
|
评论
|
假设x>0。素数的一个分数p/q是一个较低的素数-唯一的最佳近似，我们写下“p/q在L（x）中”，如果u/v<p/q<x<p'/q是所有素数u和v的v<q，其中p'是最小素数>p。
设q（1）是最小素数q，使得u/q<x表示某个素数u，p（1）则是最大素数u。序列L（x）归纳如下：对于n>1，设q（n）是最小素q，使得p（n）/q（n。
|
|
|
链接
|
|
|
|
例子
|
sqrt（8）的较低POBA从5/2、13/5、19/7、31/11、223/79、359/127开始。例如，如果p和q是素数，q>79，并且p/q<sqrt（8），那么223/79比p/q更接近sqrt。
|
|
|
数学
|
x=平方[8]；z=1000；p[k_]：=p[k]=素数[k]；
t=表[Max[Table[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]]&]；
|
|
|
交叉参考
|
|
|
|
关键字
|
非n,压裂,更多
|
|
|
作者
|
|
|
|
扩展
|
|
|
|
状态
|
经核准的
|
| |
|
|
