A372551 Decimal expansion of Sum_{k >= 1} (32*A102683(k)-A316869(k)/32)/2^k.

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

Offset

-1,1

Links

Paolo Xausa, Table of n, a(n) for n = -1..10000

J. M. Borwein and P. B. Borwein, Strange Series and High Precision Fraud, The American Mathematical Monthly, Vol. 99, No. 7 (1992), pp. 622-640.

Formula

Approximately 511/8184, correct to 240 digits: see Sum 4 in Borwein and Borwein (1992), p. 622.

Example

0.06243890518084066471163245356793743890518084066471163245...

Mathematica

First[RealDigits[Sum[(32*DigitCount[k, 10, 9] - DigitCount[k, 10, 8]/32)/2^k, {k, 400}], 10, 100]]

Crossrefs

Cf. A102683, A316869.

Sequence in context: A396069 A173273 A084945 * A370465 A358089 A010493

Adjacent sequences: A372548 A372549 A372550 * A372552 A372553 A372554

Keyword

nonn,cons

Author

Paolo Xausa, May 06 2024

Status

approved