cp's OEIS Frontend

A247418 a(n) = Sum_{i=1..n} mu(i)*(-1)^(i+1).

%I A247418 #25 Apr 04 2023 14:12:58
%S A247418 1,2,1,1,0,-1,-2,-2,-2,-3,-4,-4,-5,-6,-5,-5,-6,-6,-7,-7,-6,-7,-8,-8,
%T A247418 -8,-9,-9,-9,-10,-9,-10,-10,-9,-10,-9,-9,-10,-11,-10,-10,-11,-10,-11,
%U A247418 -11,-11,-12,-13,-13,-13,-13,-12,-12,-13,-13,-12,-12,-11,-12,-13
%N A247418 a(n) = Sum_{i=1..n} mu(i)*(-1)^(i+1).
%C A247418 Alternating sums of mu(n), the Moebius function (A008683), from 1 to n.
%H A247418 Seiichi Manyama, <a href="/A247418/b247418.txt">Table of n, a(n) for n = 1..10000</a>
%F A247418 a(n) = Sum_{i=1..n} A008683(i)*(-1)^(i+1).
%e A247418 a(n) = mu(1) - mu(2) + mu(3) - mu(4) + ... + (-1)^(n+1) * mu(n).
%p A247418 with(numtheory): A247418:=n->add(mobius(i)*(-1)^(i+1), i=1..n): seq(A247418(n), n=1..50);
%t A247418 Table[Sum[MoebiusMu[i] (-1)^(i + 1), {i, n}], {n, 50}]
%t A247418 Accumulate[Table[MoebiusMu[n](-1)^(n+1),{n,60}]] (* _Harvey P. Dale_, Oct 19 2018 *)
%o A247418 (PARI) a(n) = sum(i=1, n, moebius(i)*(-1)^(i+1)); \\ _Michel Marcus_, Sep 18 2014
%Y A247418 Cf. A008683 (moebius function).
%Y A247418 Cf. A068773 (alternating sums of eulerphi(n)).
%Y A247418 Cf. A068762 (alternating sums of sigma(n)).
%Y A247418 Cf. A002321, A344432.
%K A247418 sign,easy,look
%O A247418 1,2
%A A247418 _Wesley Ivan Hurt_, Sep 16 2014