%I#10 2023年8月30日13:03:57
%S 1、-1、-2、-1、-4、2、0、-1、-8、4、12、2、8、0、-1、-16、8、24、4、56、-12、-8、2、48、-8,
%温度-40,0,-16,0,0,-1,-32,16,48,8112,-24,-16,4240,-56,-232,-12,-208,8,0,
%U 2224,-48,-208,-8,-528,40,64,0,-288,16112,0,32,0,0,-1,-64,32,96,16224,-48,32,8480,-112,-464,-24
%N a(N)=A364952(A005940(1+N)),其中A36495二是A364557的Dirichlet逆,这是A005941的Möbius变换[A005940]。
%H Antti Karttunen,n的表格,n=0..16384的a(n)</a>
%H<a href=“/index/Bi#binary”>与n的二进制展开相关的序列的索引项</a>
%H<a href=“/index/Pri#prime_indices”>根据素因式分解中的索引计算出的序列的索引项</a>
%o(PARI)
%o A005940(n)={my(p=2,t=1);n--;直到(!n\=2,if((n%2),(t*=p),p=下一素数(p+1));t};
%o A364557(n)=如果(1==n,1,2^(素数(vecmax(因子(n)[,1]))+(二倍数(n)-ω(n));
%o备忘录A364952=地图();
%o A364952(n)=如果(1==n,1,my(v);if(mapisdefined(memoA364952,n,&v),v,v=-sumdiv(n,d,if(d<n,A364557(n/d)*A364951(d),0));地图(备忘录A364952,n,v);(v) );
%o A364953(n)=A364952(A005940(1+n));
%Y参见A005940、A005941、A364557、A364952。
%Y另请参阅A364567、A364575。
%K符号
%0、3
%2023年8月29日,安提·卡图内
|