OFFSET
1,2
LINKS
Amiram Eldar, Table of n, a(n) for n = 1..387
MATHEMATICA
f[n_] := Module[{s = 1/n}, Do[s = (s + 1/n)/(1 - s/n), {k, 1, n - 1}]; s]; Denominator @ Array[f, 20]
CROSSREFS
KEYWORD
nonn,frac
AUTHOR
Amiram Eldar, Oct 02 2021
STATUS
approved