A181673 Decimal expansion of Sum_{n>=1} moebius(n)*(1/10)^n.
0, 8, 8, 9, 9, 0, 9, 0, 0, 0, 8, 9, 9, 1, 0, 9, 8, 9, 9, 0, 1, 0, 9, 0, 0, 0, 9, 9, 8, 8, 9, 0, 1, 1, 0, 9, 9, 1, 0, 9, 8, 8, 9, 0, 0, 0, 9, 0, 0, 0, 0, 9, 9, 0, 1, 0, 1, 0, 8, 9, 9, 1, 0, 0, 0, 8, 9, 0, 0, 8, 8, 9, 9, 1, 0, 0, 0, 8, 9, 0, 0, 0, 9, 0, 1, 1, 0, 9, 9
Offset: 0
Examples
0.088990900089910989901090009988901109910...
Programs
-
Mathematica
RealDigits[ Sum[ N[ MoebiusMu[n] 10^-n, 128], {n, 120}], 10, 111][[1]] (* Robert G. Wilson v, Feb 21 2014 *)
-
PARI
sum(n=1,default(realprecision)+1,moebius(n)/10.^n) \\ Charles R Greathouse IV, Feb 13 2011
Extensions
Corrected by Charles R Greathouse IV, May 27 2015