A194182 Decimal expansion of the (finite) value of Sum_{ k >= 1, k has no odd digit in base 10 } 1/k.

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

Offset: 1

Author

Robert G. Wilson v, Aug 18 2011

Keywords

• cons
• nonn

Examples

			1.96260841299461698515915426473729435671283066551443535467152223586...
		

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. A014263, A194181.

Programs

Mathematica

RealDigits[kSum[{1, 3, 5, 7, 9}, 120 ]][[1]] (* Amiram Eldar, Jun 15 2023, using Baillie and Schmelzer's kempnerSums.nb, see Links *)

Formula

Equals Sum_{n>=2} 1/A014263(n). - Bernard Schott, Jan 13 2022