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,2

Links

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

Example

0.088990900089910989901090009988901109910...

Mathematica

RealDigits[ Sum[ N[ MoebiusMu[n] 10^-n, 128], {n, 120}], 10, 111][[1]] (* Robert G. Wilson v, Feb 21 2014 *)

Prog

(PARI) sum(n=1, default(realprecision)+1, moebius(n)/10.^n) \\ Charles R Greathouse IV, Feb 13 2011

Crossrefs

Cf. A008683, A238270, A238271, A238273.

Sequence in context: A121309 A020785 A090654 * A238272 A187107 A179412

Adjacent sequences: A181670 A181671 A181672 * A181674 A181675 A181676

Keyword

cons,nonn

Author

Mats Granvik, Nov 04 2010

Extensions

Corrected by Charles R Greathouse IV, May 27 2015

Status

approved