0,1
Table of n, a(n) for n=0..119.
Eric Weisstein's World of Mathematics, Perfect Power
RealDigits[Total[Block[{$MaxExtraPrecision = 10^3}, N[#, 120] & /@ Table[MoebiusMu[k] (1 - Zeta[k]), {k, 2, 10^3}]]]][[1]]
Cf. A001597.
Sequence in context: A260060 A260800 A196914 * A274442 A249136 A154815
Adjacent sequences: A072099 A072100 A072101 * A072103 A072104 A072105
nonn,cons
Eric W. Weisstein, Jun 18 2002
Corrected by Eric W. Weisstein, May 06 2013
approved