A100198 Let f(0) = -1, f(n) = Moebius(n) = A008683(n) for n>0. Sequence gives partial sums a(n) = Sum_{ 0 <= i <= n} f(i).

-1, 0, -1, -2, -2, -3, -2, -3, -3, -3, -2, -3, -3, -4, -3, -2, -2, -3, -3, -4, -4, -3, -2, -3, -3, -3, -2, -2, -2, -3, -4, -5, -5, -4, -3, -2, -2, -3, -2, -1, -1, -2, -3, -4, -4, -4, -3, -4, -4, -4, -4, -3, -3, -4, -4, -3, -3, -2, -1, -2, -2, -3, -2, -2, -2, -1, -2, -3, -3, -2, -3, -4, -4, -5, -4, -4, -4, -3, -4, -5, -5, -5, -4, -5, -5, -4, -3, -2, -2, -3, -3, -2, -2, -1, 0, 1, 1, 0, 0, 0, 0, -1, -2, -3, -3

Offset

0,4

Links

Table of n, a(n) for n=0..104.

Maple

seq(abs(sum(mobius(x), x=0..a)), a=0..100);

Mathematica

Accumulate[Join[{-1}, MoebiusMu[Range[110]]]] (* Harvey P. Dale, Jun 20 2017 *)

Crossrefs

See A002321 for a better version.

Sequence in context: A107573 A081308 A070210 * A164996 A216195 A304333

Adjacent sequences: A100195 A100196 A100197 * A100199 A100200 A100201

Keyword

sign

Author

Jorge Coveiro, Dec 27 2004

Status

approved