%I#49 2021年3月2日06:00:05
%S 2,4,5,8,9,11,14,15,17,19,20,22,23,27,28,31,32,34,36,38,39,41,43,46,
%电话:47,48,49,52,54,56,58,61,63,64,67,69,72,73,75,76,81,83,85,86,90,91,92,
%电话:93,94,95,96,99101103107109111114115117118120124125128
%形式为4*k+3(A002145)的素数在所有素数(A000040)中的N个位置。
%C似乎a(n)=k,这样二项式(素数(k),3)mod 2=1。参见Maple代码_Gary Detlefs,2011年12月6日
%C以上是正确的(工作模式4)_Charles R Greathouse IV,2011年12月6日
%这个序列的渐近密度是1/2(根据狄利克雷定理)_Amiram Eldar,2021年3月1日
%H Zak Seidov,n的表,n的a(n)=1..10000</a>
%F a(n)=A049084(A002145(n))_R.J.Mathar,2008年10月6日
%p位置_素数_k _ mod_n(300,3,4);#A080147中给出。
%p A080148:=程序(n)
%编号理论[pi](A002145(n));
%p端程序:
%p序列(A080148(n),n=1..40);#_R.J.Mathar,2011年12月8日
%t压平[Position[Prime[Range[200]],_?(整数Q[(#-3)/4]&)]](*哈维·P·戴尔,2011年6月6日*)
%t选择[Range[135],Mod[Prime[#],4]==3&](*_Amiram Eldar_,2021年3月1日*)
%o(PARI)i=0;for prime(p=2,1e3,i++;if(p%4==3,print1(i“,”))\\_Charles R Greathouse IV_,2011年12月6日
%Y A080147的几乎补码(1不包括在两者中)。
%Y参考A000040、A002145、A049084。
%K非n
%O 1,1号机组
%2003年2月11日,安蒂·卡图内
|