A194183 Decimal expansion of the (finite) value of Sum_{ k>=1, k has no "0" digit in base 100 } 1/k.

4, 6, 0, 5, 2, 5, 2, 0, 2, 6, 3, 8, 5, 1, 2, 4, 7, 1, 1, 4, 2, 9, 3, 6, 7, 5, 3, 5, 6, 6, 4, 1, 5, 2, 9, 4, 9, 7, 1, 2, 5, 6, 9, 0, 9, 9, 0, 8, 4, 7, 9, 3, 4, 0, 6, 0, 1, 6, 9, 5, 6, 7, 2, 8, 7, 2, 5, 0, 0, 6, 8, 1, 8, 8, 6, 4, 2, 1, 4, 6, 9, 6, 7, 2, 2, 8, 7, 5, 0, 7, 1, 7, 6, 2, 7, 5, 8, 2, 5, 4, 7, 9, 4

Offset: 3

Author

Robert G. Wilson v, Aug 18 2011

Keywords

• base
• cons
• nonn

Examples

			460.525202638512471142936753566415294971256909908479340601695672872...
		

Links

• Robert Baillie and Thomas Schmelzer, Summing Kempner's Curious (Slowly-Convergent) Series, Mathematica Notebook kempnerSums.nb, Wolfram Library Archive, 2008.
• Wikipedia, Kempner series.

Crossrefs

Cf. A082839.

Programs

Mathematica

RealDigits[kSum[0, 120, 100]][[1]] (* Amiram Eldar, Jun 15 2023, using Baillie and Schmelzer's kempnerSums.nb, see Links *)