%我
%S 1,4,4,4_6,4,2,14,6,10,12,2,6,2,4,8,4,6,6,6,10,4,6,4,10,2,14,14,8,
%T 10,2,18,8,8,4,10,4,8,12,6,14,2,2,8,12,6,10,10,12,10,8,2,4,6,6,16,
%U 14,6,6,2,10,6,2,8,6,20,2,8,28,6,16,2,6,2,10,6,4,14,6,2
%N a(N)是A262275(N)和下一个低素数之间的差值。
%这个序列可用作逼近素数函数pi(n)的另一种方法。
%H Alois P.Heinz,n的表格,n=1..10000的a(n)</a>
%H Michael P.May,<a href=“https://doi.org/10.35834/2020/3202158“>高阶素数序列的性质,密苏里数学科学杂志(2020)第32卷,第2期,158-170;以及https://arxiv.org/abs/1208.04662“>arXiv-version</a>,arXiv:2108.04662[math.NT],2021。
%H Michael P.May,<a href=“https://arxiv.org/abs/2112.08941“>通过对唯一素数子序列的运算逼近素数计数函数,arXiv:2112.08941[math.GM],2021。
%F a(n)=p_p'(n)-p(p'(n。
%F a(n)=A001223(A000720(A262275(n))-1)。
%F a(n)=A262275(n)-A151799(A262276(n))_阿洛伊斯·海因茨,2022年1月6日
%e对于n=3,a(3)=17-13=4。
%p b:=proc(n)选项记忆;
%p`if`(i素数(n),1+b(数字[pi](n)),0)
%p端:
%p g:=proc(n)选项记忆;局部p;p: =克(n-1);
%pdop:=下一素数(p);
%p如果b(p)::即使然后中断fi
%p od;第页
%p端:g(1):=3:
%p a:=n->(t->t-前素(t))(g(n)):
%p序列(a(n),n=1..86);#_阿洛伊斯·海因茨,2022年1月6日
%t fQ[n_]:=如果[!PrimeQ[n]||(PrimeQ[n]&&FreeQ[lst,PrimePi[n]]),附加到[lst,n]];k=2;lst={1};当[k<10000000时,fQ@k(平方公里);k++];tab1=选择[lst,PrimeQ]
%t lowerP[n_]:=模块[{m},m=n;而[!PrimeQ[m-1],m--];m-1]
%t tab2=较低P/@tab1
%t tab3=tab1-tab2
%Y参见A151799、A262275、A333242。
%K nonn公司
%O 1,2号机组
%A _迈克尔·P.2021年5月,10月30日
|