A367310 Continued fraction of the constant in A367309 (the area under the curve (1 - 2^(1-x)) zeta(x) from 0 to 1).

0, 1, 1, 1, 1, 18, 2, 1, 37, 3, 1, 2, 20, 1, 3, 3, 1, 1, 1, 1, 2, 1, 26, 1, 1, 1, 2, 4, 3, 1, 76, 1, 3, 1, 1, 2, 1, 1, 3, 5, 3, 1, 10, 2, 5, 1, 3, 8, 1, 3, 2, 2, 5, 2, 1, 1, 1, 6, 2, 36, 5, 1, 2, 1, 1, 1, 9, 4, 3, 1, 1, 4, 1, 1, 2, 1, 1, 3, 1, 2, 1, 1, 29, 1

Offset

0,6

Links

Table of n, a(n) for n=0..83.

Mathematica

ContinuedFraction[NIntegrate[(1 - 2^(1-x)) Zeta[x], {x, 0, 1), WorkingPrecision ->300]]

Prog

(PARI) localprec(100); contfrac(intnum(x=0, 1, (1-2^(1-x))*zeta(x))) \\ Michel Marcus, Nov 14 2023

Crossrefs

Cf. A367309, A367311.

Sequence in context: A242567 A040319 A040318 * A040320 A040321 A040322

Adjacent sequences: A367307 A367308 A367309 * A367311 A367312 A367313

Keyword

nonn,cofr

Author

Alejandro Malla, Nov 13 2023

Status

approved