A119029 Numerator of Sum_{k=1..n} n^(k-1)/k!.
1, 2, 4, 25, 217, 203, 6743, 69511, 1184417, 728102, 5720654791, 601499, 4670663321629, 42568060798, 888330615353, 15438515749903, 1676770323947695709, 30538296012677, 16858207434636875406943
Offset: 1
Examples
The first few fractions are 1, 2, 4, 25/3, 217/12, 203/5, 6743/72, 69511/315, 1184417/2240, 728102/567, ... = A119029/A214401. - _Petros Hadjicostas_, May 12 2020
Programs
-
Mathematica
Numerator[Table[Sum[n^(k-1)/k!,{k,1,n}],{n,1,30}]]
Formula
a(n) = numerator(Sum_{k=1..n} n^(k-1)/k!).
a(n) = A120267(n)/n.
Comments