OFFSET
0,1
LINKS
Iaroslav V. Blagouchine and Marc-Antoine Coppo, A note on some constants related to the zeta-function and their relationship with the Gregory coefficients, arXiv:1703.08601 [math.NT], 2017. Also The Ramanujan Journal 47.2 (2018): 457-473. See Th. 1.
FORMULA
MATHEMATICA
g[n_] := -(-1)^n*Sum[StirlingS1[n, j]/(j + 1), {j, 1, n}]/n!; Flatten[{2, 6, Denominator[Table[g[n]/n^2 + Sum[g[k]*g[n + 1 - k]*(HarmonicNumber[n] - HarmonicNumber[k])/(n + 1 - k), {k, 1, n - 1}], {n, 2, 20}]]}] (* Vaclav Kotesovec, Feb 16 2020 *)
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
N. J. A. Sloane, Feb 16 2020
EXTENSIONS
More terms from Vaclav Kotesovec, Feb 16 2020
STATUS
approved