|
|
A344916
|
|
Decimal expansion of Integral_{x=0..1} -x*zeta(1 - x).
|
|
0
|
|
|
7, 3, 6, 7, 8, 9, 9, 1, 1, 4, 1, 3, 4, 4, 8, 6, 4, 3, 9, 8, 8, 3, 7, 4, 5, 7, 5, 4, 4, 4, 3, 2, 1, 6, 9, 3, 3, 6, 5, 5, 4, 6, 5, 6, 9, 1, 1, 0, 0, 6, 1, 3, 2, 8, 5, 2, 8, 9, 1, 1, 1, 8, 7, 0, 5, 5, 9, 8, 7, 7, 0, 3, 5, 4, 0, 1, 4, 7, 4, 6, 1, 2, 9, 2, 0, 4
(list;
constant;
graph;
refs;
listen;
history;
text;
internal format)
|
|
|
OFFSET
|
0,1
|
|
LINKS
|
|
|
EXAMPLE
|
0.736789911413448643988374575444321693365546569110...
|
|
MAPLE
|
Digits:=100: Int(-s*Zeta(1 - s), s=0..1): evalf(%*10^90):
ListTools:-Reverse(convert(floor(%), base, 10));
|
|
MATHEMATICA
|
ndig = 100; RealDigits[N[-Integrate[x*Zeta[1 - x], {x, 0, 1}], ndig + 1], 10, ndig][[1]] (* Amiram Eldar, Jul 15 2021 *)
|
|
PROG
|
(PARI) intnum(x=0, 1, -x*zeta(1-x)) \\ Michel Marcus, Jul 15 2021
|
|
CROSSREFS
|
|
|
KEYWORD
|
|
|
AUTHOR
|
|
|
STATUS
|
approved
|
|
|
|