%I#9 2021年2月17日20:26:27
%S 0,0,00,0,1,0,0,0,0',0,0,
%温度0,0,0,1,0,0,0,1,0,
%U 1,1,1,0,1,0,1,0、1,0,10,0,0,10,1,,0,0、0,2,0,1,0-0,01,0,1,1,0,2,0
%N A003961(N)和A003973(N)共享的素因子数(具有多重性):a(N)=bigomega(gcd(A00396l(N),sigma(A00396(N)))。
%H Antti Karttunen,n的表,n=1..65537的a(n)</a>
%H<a href=“/index/Pri#prime_indices”>根据素因式分解中的索引计算出的序列的索引项</a>
%H<a href=“/index/Si#SIGMAN”>与sigma(n)相关序列的索引条目</a>
%F a(n)=A001222(A336850(n))=A0011222(gcd(A003961(n),A003973(n)。
%F a(n)=A341523(A003961(n))。
%t f[p_,e_]:=下一素数[p]^e;g[1]=1;g[n_]:=倍@@f@@FactorInteger[n];a[n]:=PrimeOmega[GCD[(gn=g[n]),除数西格玛[1,gn]];数组[a,100](*_Amiram Eldar_,2021年2月17日*)
%o(PARI)
%o A003961(n)={my(f=因子(n));对于(i=1,#f~,f[i,1]=下一素数(f[i、1]+1));因子回退(f);};\\来自A003961
%o A341519(n)=大ω(gcd(A003961(n),σ(A00396(n)));
%Y参见A000203、A001222、A003961、A003973、A336850、A341523。
%K nonn公司
%O 1,24号机组
%2021年2月17日,安提·卡图内
|