A270742 Binary expansion of C = (1/2)*(3/4)*(7/8)*(15/16)... .

0, 1, 0, 0, 1, 0, 0, 1, 1, 1, 1, 0, 1, 1, 1, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 1, 0, 0, 0, 0, 0, 0, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 1, 0, 1, 1, 1, 1, 1, 1, 1, 0, 0, 0, 0, 0, 0, 0, 0, 0

Offset

0

Links

Clark Kimberling, Table of n, a(n) for n = 0..10000

Formula

C = Product_{n >= 1} (2^n-1)/(2^n).

Example

C = 0.0100100111101110000001000011111111011111000... (base 2);
C = 0.2887880950866024212788997219292307800... (base 10), as at A048651.

Mathematica

Join[{0}, RealDigits[QPochhammer[1/2], 2, 200][[1]]]

Prog

(PARI) binary(prodinf(n=1, 1-2^-n)) \\ Charles R Greathouse IV, Jan 31 2017

Crossrefs

Cf. A048651 (base 10), A270743 (runlengths).

Sequence in context: A091445 A091446 A341256 * A164349 A094186 A267371

Adjacent sequences: A270739 A270740 A270741 * A270743 A270744 A270745

Keyword

nonn,easy,base,cons

Author

Clark Kimberling, Apr 04 2016

Status

approved