login
A130425
a(n) = numerator of Sum_{k=1..n} 1/k^(n+1-k).
1
1, 3, 19, 107, 1471, 164059, 65442581, 26560388929, 10901416818161, 4504891039128649, 20562691778919031051, 94108143760454361244249, 5609165278757040127506253363, 334755533004517896353486403105731
OFFSET
1,2
MATHEMATICA
Table[Numerator[Sum[1/k^(n + 1 - k), {k, 1, n}]], {n, 1, 20}] (* Stefan Steinerberger, May 30 2007 *)
CROSSREFS
Sequence in context: A323290 A072950 A240123 * A334976 A103005 A162354
KEYWORD
frac,nonn
AUTHOR
Leroy Quet, May 26 2007
EXTENSIONS
More terms from Stefan Steinerberger, May 30 2007
STATUS
approved