login
A367310
Continued fraction of the constant in A367309 (the area under the curve (1 - 2^(1-x)) zeta(x) from 0 to 1).
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
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
Sequence in context: A242567 A040319 A040318 * A040320 A040321 A040322
KEYWORD
nonn,cofr
AUTHOR
Alejandro Malla, Nov 13 2023
STATUS
approved