%I#42 2024年2月21日01:10:57
%S 2,5,7,13,19,23,29,31,37,43,47,53,59,61,71,73,79,89,97101103107,
%电话:113131137139149151163167173179181193199223229,
%电话:2332392512572632692712812933073113173313373347349359373
%N个素数,在它们的素数索引链中有奇数个步长。
%C该序列也可以由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。
%H Michael P.May,<a href=“https://doi.org/10.35834/2023/3501105“>素数计数函数与唯一素数序列之间的关系,密苏里数学科学杂志(2023),第35卷,第1期,105-116。
%H Michael P.May,<a href=“https://arxiv.org/abs/2402.13214“>包含排除原理在素数子序列中的应用,arXiv:2402.13214[math.GM],2024。
%素数中的F{p:A078442(p)mod 2=1}。
%F a(n)=A000720(A262275(n))_安德鲁·霍罗伊,2020年3月15日
%p b:=proc(n)选项记忆;
%p`if`(i素数(n),1+b(数字[pi](n)),0)
%p端:
%p a:=proc(n)选项记忆;局部p;p: =a(n-1);
%pdop:=下一素数(p);
%p如果b(p)::奇数,则中断fi
%p od;第页
%p端:a(1):=2:
%p序列(a(n),n=1..60);#_阿洛伊斯·海因茨,2020年3月15日
%t选择[Prime@Range@75,EvenQ@Length@NestWhileList[PrimePi,#,PrimeQ]&](*_Giovanni Resta_,2020年3月15日*)
%o(PARI)\\此处b(n)为A078442。
%ob(n)={my(k=0);while(isprime(n),k++;n=素数(n));k}
%o选择(n->b(n)%2,[1..500])\\ Andrew Howroyd_,2020年3月15日
%Y参见A000040、A000720、A078442、A262275(素数补码)、A333243、A333144。
%K nonn公司
%O 1,1号机组
%A _迈克尔P.2020年5月、3月12日
%E条款a(21)及以上,来自_Andrew Howroyd_,2020年3月15日
|