%I #3 May 31 2021 13:08:53
%S 1,-1,0,-1,1,0,0,1,-1,0,0,0,1,0,0,-1,0,1,0,-1,0,0,0,0,-1,-1,0,0,-1,0,
%T 0,0,0,0,0,1,1,0,0,0,-1,0,0,0,-1,0,0,0,1,1,0,0,0,0,0,0,0,0,0,0,1,0,0,
%U -1,0,0,0,0,0,0,0,-1,1,-1,0,0,0,0,0,-1,0,0,0,0,0,0,0,0
%N a(n) = mu(sigma(n)).
%H <a href="/index/Si#SIGMAN">Index entries for sequences related to sigma(n)</a>
%F a(n) = A008683(A000203(n)).
%e a(8) = mu(sigma(8)) = mu(1+2+4+8) = mu(15) = 1.
%t Table[MoebiusMu[DivisorSigma[1, n]], {n, 100}]
%Y Cf. A008683 (mu), A000203 (sigma).
%K sign
%O 1
%A _Wesley Ivan Hurt_, May 31 2021
|