A265770-组织环境信息系统

A265770型

素数分子——仅最佳逼近（POBA）为6；请参阅注释。

三

13, 11, 19, 17, 31, 29, 43, 41, 67, 79, 103, 101, 113, 139, 137, 173, 223, 257, 283, 281, 317, 353, 367, 401, 439, 499, 607, 619, 617, 643, 641, 653, 677, 761, 787, 823, 821, 907, 941, 977, 1039, 1087, 1181, 1193, 1361, 1373, 1399, 1433, 1447, 1543, 1579 (列表；图表；参考；听；历史；文本；内部格式)

	抵消	`1,1`
	评论	`假设x>0。素数的分数p/q是唯一素数的最佳近似（POBA），我们写“B（x）中的p/q”，如果0<\|x-p/q\|<\|x-u/v\|对于所有素数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型有关相关序列的指南。`
	链接	`n=1..51时的n，a（n）表。`
	例子	`至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[xp[k]，-1]/p[k]、{k、1、n}]]、{n、1、z}]；` `d=删除重复项[t]；tL=选择[d，#>0&]（下部POBA）` `t=表[Min[Table[NextPrime[xp[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型/2006年2月71日)` `分子[tL](A227756号)` `分母[tL](A158015型)` `分子[tU](A051644号)` `分母[tU](A007693号)` `分子[y](A222570型)` `分母[y](2006年2月71日)`
	交叉参考	`囊性纤维变性。A000040美元,A265759型,A227756号,A158015型,A051644号,A007693号,2006年2月71日.` `上下文中的序列：A259663型 A160130型 A340803型A359868飞机 A206607型 A196124号` `相邻序列：A265767型 A265768型 A265769型2006年2月71日 A265772型 A265773型`
	关键词	`非n,压裂`
	作者	`克拉克·金伯利2015年12月20日`
	状态	`经核准的`