login
A194183
Decimal expansion of the (finite) value of Sum_{ k>=1, k has no "0" digit in base 100 } 1/k.
0
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,1
LINKS
Robert Baillie and Thomas Schmelzer, Summing Kempner's Curious (Slowly-Convergent) Series, Mathematica Notebook kempnerSums.nb, Wolfram Library Archive, 2008.
Wikipedia, Kempner series.
EXAMPLE
460.525202638512471142936753566415294971256909908479340601695672872...
MATHEMATICA
RealDigits[kSum[0, 120, 100]][[1]] (* Amiram Eldar, Jun 15 2023, using Baillie and Schmelzer's kempnerSums.nb, see Links *)
CROSSREFS
Cf. A082839.
Sequence in context: A243983 A117036 A016723 * A011442 A135183 A198228
KEYWORD
base,cons,nonn
AUTHOR
Robert G. Wilson v, Aug 18 2011
STATUS
approved