login
A087812
Sum of MoebiusMu for numbers between n and 2n inclusive.
0
0, -2, -1, -1, 0, 0, -1, 1, 0, -1, 0, 0, 1, 2, -1, -3, -1, 1, 1, 3, 1, -1, -1, -1, -1, 0, -2, -1, 1, 1, 2, 3, 3, 1, 0, -2, -2, -1, -2, -4, -3, -3, 0, 2, 1, 2, 3, 5, 4, 4, 2, 0, 0, 0, -2, -2, -4, -4, -4, -2, -1, 1, 0, -1, -1, -3, 0, 1, -1, -3, 0, 2, 4, 5, 3, 2, 1, 1, 2, 4, 5, 4, 3, 3, 2, 1, -2, -3, -1, -1, -3, -3, -3, -3, -5, -7, -7, -7, -8, -9, -7, -5, -2
OFFSET
0,2
MATHEMATICA
Table[Apply[Plus, Table[MoebiusMu[w], {w, n, 2*n}]], {n, 1, 256}]
CROSSREFS
Sequence in context: A198066 A141664 A056979 * A288384 A113045 A309365
KEYWORD
sign
AUTHOR
Labos Elemer, Oct 14 2003
STATUS
approved