%I#26 2021年5月8日22:58:20
%序号3,5,7,13,19,23,31,37,43,53,61,73,79,83,89103113131139139,
%电话:157163173193199211211223251257271277293231317,
%电话:331337353359379383389397421443449457463467479499509523
%N a(N)=最大素数<2*素数(N)。
%C也是第一对连续素数中最小的一个,在它们之间是一个可被第n个素数整除的复合数_阿玛纳斯·穆尔西(Amarnath Murthy),2002年9月25日
%C除初始项外,A006992是基于n->A151799(2n)迭代的子序列。该序列的范围是A065091的子集_M.F.Hasler,2016年5月8日
%H Zak Seidov,n的表格,n=1..1000的a(n)</a>
%F a(n)=A007917(A100484(n))_R.J.Mathar,2016年5月8日
%e n=18:p(18)=61,因此a(18)是2×61=122以下的最大素数,即113。
%p(数字理论):
%p A059788:=程序(n)
%p素数(2*ithprime(n));
%p端程序:
%p序列(A059788(n),n=1..50);#_R.J.Mathar,2016年5月8日
%t a[n_]:=素数[PrimePi[2素数[n]]]
%t NextPrime[2*Prime[范围[100]],-1](*_Zak Seidov_,2016年5月8日*)
%o(PARI)a(n)=预素数(2*素数(n));\\_米歇尔·马库斯(Michel Marcus),2016年5月8日
%Y参见A005382、A005383、A00538、A00535、A055496、A006992、A052248。
%K nonn公司
%O 1,1号机组
%A _Labos Elemer,2001年2月22日
|