OFFSET
0,2
EXAMPLE
0.0832307059225399041090878776318797897829456855826090...
MAPLE
evalf(Sum(bernoulli(k+1) / ((k+1) * k^(k+1)), k = 1..infinity), 120); # Vaclav Kotesovec, Aug 11 2021
MATHEMATICA
a[n_] := Sum[BernoulliB[1 + k] / ((1 + k) * k^(1 + k)), {k, 1, n}];
{0, RealDigits[N[a[240], 140], 10, 90][[1]]} // Flatten
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Peter Luschny, Aug 11 2021
STATUS
approved