%I#19 2020年3月1日12:13:16
%S 0,0,1,2,3,3,4,4,5,5,4,6,6,4,6、6,6,1,7,5,6,6、6、6,1,8,8,5,6、8,6,8,
%T 6,6,11,9,4,6,10,8,8,6,110,8,4,10,11,7,8,5,6,8,10,10,6,4,12,12,4,
%U 8,11,9,10,8,6,8,10,8、12,12,4,8,10、8,10
%N Boris-Stechkin函数:a(N)是m的个数,其中2<=m<=N,楼层(N(m-1)/m)可被m-1整除。
%C Stechkin证明:
%Cn-1是素数,当a(n)=A000005(n)。
%Cn-1和n+1是双素数,即n在A014574中,当a(n)+a(n+1)=2*A00005(n)时。
%如果p<q是奇数素数,那么和{k=p+1..q}(-1)^ka(k)=0。
%D R.K.Guy,《数论中未解决的问题》,Springer 2013年,第A17节。
%H Robert Israel,n的表,n=0..10000的a(n)</a>
%F猜想:当n>=2时,a(n)=τ(n)+τ(n-1)-2_Ridouane Oudra,2020年2月28日
%e对于n=6,m的值为2,3,5,6,因此a(6)=4。
%p N:=1000:#得到a(0)到a(N)
%p A:=矢量(N):
%p表示m从2到N do
%p L:=[seq(seq(k*m+j,j=0..1),k=1..N/m)];
%p如果L[-1]>N,则L:=L[1..-2]fi;
%p A[L]:=映射(`+`,A[L],1);
%日期:
%p0,seq(A[i],i=1..N);
%t a[n_]:=总和[Boole[Divisible[Floor[n(m-1)/m],m-1]],{m,2,n}];
%t表[a[n],{n,0,100}](*Jean-François Alcover_,2019年4月29日*)
%o(PARI)a(n)=总和(m=2,n,n*(m-1)\m%(m-1
%Y参考A000005、A014574、A055004。
%K nonn公司
%0、4
%2016年6月6日以色列罗贝尔特
|