La función Mertens se puede calcular en Mathematica por:
Accumulate[Table[MoebiusMu[k], {k, 1, n}]]
y se escribe como $$M(n)=\sum_{k=1}^n\mu(k)$$
¿Podría alguien decirme cómo debo escribir
Table[Mean[Accumulate[Table[MoebiusMu[k], {k, 1, n}]]], {n, 1, x}]
en notación matemática?