|
| |
|
|
A160502
|
|
Decimal expansion of the (finite) value of the sum_{ k >= 1, k has only a single zero digit in base 2 } 1/k.
|
|
2
| |
|
|
1, 4, 6, 2, 5, 9, 0, 7, 3, 5, 0, 4, 4, 3, 6, 4, 6, 9, 9, 5, 4, 6, 1, 4, 5, 4, 4, 6, 7, 2, 0, 5, 3, 4, 6, 2, 1, 0, 7, 4, 7, 4, 4, 8, 6, 4, 7, 4, 8, 8, 2, 1, 1, 0, 9, 3, 6, 4, 2, 0, 0, 6, 2, 4, 3, 5, 4, 5, 2, 2, 9, 4, 3, 7, 8, 5, 8, 8, 1, 5, 0, 3, 5, 5, 2, 1, 9, 2, 9, 2, 2, 1, 5, 9, 2, 4, 0, 8, 9, 2, 3, 6, 9, 7, 5
(list; constant; graph; refs; listen; history; internal format)
|
|
|
|
OFFSET
| 1,2
|
|
|
COMMENTS
| The sum of 1/n where n has a single 0 in base 2.
|
|
|
LINKS
| Baillie, Revised August 17, 2008, Summing The Curious Series Of Kempner And Irwin
|
|
|
FORMULA
| Sum {n = 2..inf} Sum {k = 0..n-2}, 1/(2^n-1-2^k).
|
|
|
EXAMPLE
| =1.462590735044364699546145446720534621074744864748821109364200624354522943785881503552192922159240892369758196488145931267261898...
|
|
|
MATHEMATICA
| RealDigits[ N[ Sum[1/(2^n - 1 - 2^k), {n, 2, 400}, {k, 0, n - 2}], 111]][[1]]
(* first install irwinSums.m, see reference, then *) First@ RealDigits@ iSum[0, 1, 111, 2] [From Robert G. Wilson v (rgwv(AT)rgwv.com), Aug 03 2010]
|
|
|
CROSSREFS
| Cf. A140502.
Sequence in context: A059854 A155991 A184083 * A010669 A029677 A045867
Adjacent sequences: A160499 A160500 A160501 * A160503 A160504 A160505
|
|
|
KEYWORD
| base,cons,nonn
|
|
|
AUTHOR
| Robert G. Wilson v (rgwv(AT)rgwv.com), May 15 2009
|
| |
|
|
