OFFSET
1,2
COMMENTS
Truncated Mertens function = summatory Moebius when argument runs through nonprimes.
MATHEMATICA
mer[x_] :=mer[x]=mer[x-1]+MoebiusMu[x]; mer[0]=0; $RecursionLimit=1000; t=Table[mer[w]+PrimePi[w], {w, 1, 1000}] Table[Min[Flatten[Position[t, j]]], {j, 1, 200}]
CROSSREFS
KEYWORD
nonn
AUTHOR
Labos Elemer, Apr 28 2004
STATUS
approved