_拉博电子. (拉博斯(自动变速箱)安娜.索特.胡),埃利默_,2003年4月17日
OEIS服务器: https://oeis.org/edit/global/2029
编辑
经核准的
Harvey P.Dale,<a href=“/A082888号/b082888.txt“>n表,n=1..1000时为a(n)</a>
转置[Select[Partition[Prime[Range[2000]],2,1],(Last[#]-First[#])/Log[First[#]]>3&]][1](*哈维·P·戴尔2013年4月20日*)
Do[s=(素数[n+1]-素数[n])/Log[Prime[n]//n;如果[s>3,,打印[Prime[n]]], {]]], {n个,,1,,2000}]
非n,新的
非n
拉博斯E.(拉博斯(AT)ana1型安娜sote.hu),2003年4月17日
素数p使得(r-p)/log(p)>3,其中r是p之后的下一个素数。
1129, 1327, 1669, 2179, 2477, 2971, 3137, 3271, 4297, 4831, 5119, 5351, 5531, 5591, 5749, 5953, 6491, 6917, 7253, 7759, 7963, 8389, 8467, 8893, 8971, 9551, 9973, 10009, 10399, 10531, 10799, 10909, 11743, 12163, 12853, 13063, 13187, 13933
1,1
素数(j)使得(素数(j+1)-素数(j))/log(素数)>3。
如果p=1327,则r=1361和(r-p)/log(p)=34/log(1327)=4.72834……,则顺序为1327。
Do[s=(素数[n+1]-素数[n])/Log[Prime[n]//n;如果[s>3,打印[Prime[n]]],{n,1,2000}]
囊性纤维变性。A082862号,A082884号-A082886美元,A082889号-A082891号.
Labos E.(Labos(AT)ana1.sote.hu),2003年4月17日