%I#17 2020年1月28日00:29:38
%第2,3,4,7,8,9,10,19,21,2,53,54,56,57,58131132133134135136页,
%电话:311312719720721722723724725726191620367136728161,
%电话:816281638164816581661786317864178651786617867178681786917870
%N pi(N)是2的幂,其中pi(N)=A000720(N)为素数<=N。
%C数字出现在连续整数块中:2,3-4,7-10,19-22。。。;第n个块从第2^n个素数(A033844)开始,在第(2^n+1)个素数之前结束(A051439)。
%H Chai Wah Wu,n表,n(n)表示n=1..1103(n=1.665来自Ivan Neretin)
%由于pi(10)=4=2^2,因此e10处于序列中。
%t功率2[n]:=n==1||(n>1&&IntegerQ[n/2]&&pow2[n/2]);选择[Range[20000],pow2[PrimePi[#]]&]
%t吨扁平@桌子[范围[p=素数[2^k],下一素数[p]-1],{k,0,11}](*_Ivan Neretin_,2017年1月21日*)
%o(PARI)isok(n)=我的(pi=素数(n));(pi==1)||(pi==2)|||(i幂(素数pi(n),,&k)&&(k==2_米歇尔·马库斯,2017年1月23日
%Y参见A000079、A000720、A015910、A073797、A07379。
%K nonn公司
%O 1,1号机组
%A _Labos Elemer,2002年8月14日
%E编辑:Dean Hickerson,2002年8月15日
|