OFFSET
0,3
COMMENTS
The corresponding denominators are in A234715.
MATHEMATICA
nmax = 54; Table[ Numerator[ Sum[ 1/(k HarmonicNumber[k]), {k, 1, n} ] ], {n, 0, nmax} ]
CROSSREFS
KEYWORD
nonn,easy
AUTHOR
Stuart Clary, Dec 29 2013
STATUS
approved