A130425 a(n) = numerator of Sum_{k=1..n} 1/k^(n+1-k).

1, 3, 19, 107, 1471, 164059, 65442581, 26560388929, 10901416818161, 4504891039128649, 20562691778919031051, 94108143760454361244249, 5609165278757040127506253363, 334755533004517896353486403105731

Offset: 1

Author

Leroy Quet, May 26 2007

Keywords

• frac
• nonn

Crossrefs

Cf. A130426, A003101.

Programs

Mathematica

Table[Numerator[Sum[1/k^(n + 1 - k), {k, 1, n}]], {n, 1, 20}] (* Stefan Steinerberger, May 30 2007 *)

Extensions

More terms from Stefan Steinerberger, May 30 2007