%I#14 2022年5月9日09:26:47
%S 1,1,1,2,1,1,1,3,2,1,1,3,1,1,1,2,4,1,2,1,3,2,1,5,2,1,2,3,1,2,5,2,1,
%温度2,5,1,1,2,5,1,2,1,3,3,1,7,2,2,3,1,2,2,5,2,1,1,6,1,3,6,2,2,1,3,
%U 2,2,1,8,1,1,3,3,2,1,7,3,1,1,6,2,1,2,5,1,32,3
%N算术导数为偶数的N的除数。
%F a(n)=和{d|n}((1+d')模2)。
%F a(n)=τ(n)/2+(1/2)*和{d|n}(-1)^(d')。
%F a(n)=A000005(n)-A353235(n)。
%F a(n)=A000005(n)/2+A353237(n)/2。
%e a(12)=3;12有三个算术导数为偶数的除数:1’=0,4’=4,12’=16。
%td[1]=0;d[n_]:=n*Plus@@((Last[#]/First[#])和/@FactorInteger[n]);a[n_]:=除数和[n,1&,EvenQ[d[#]]&];数组[a,100](*_Amiram Eldar_,2022年5月2日*)
%o(PARI)ad(n)=向量([n/f[1]*f[2]|f<-因子(n+!n)~]);\\A003415号
%o a(n)=sumdiv(n,d,!(ad(d)%2));\\_米歇尔·马库斯,2022年5月2日
%Y参考A000005(τ)、A003415(n’)、A353235、A353237。
%K nonn公司
%O 1,4型
%A _Wesley Ivan Hurt_,2022年5月1日
|