OFFSET
1,5
EXAMPLE
The positive integers coprime to 8 and <= 8 are 1,3,5,7. So a(8) is the denominator of 7 +1/(5 +1/(3 +1/1)) = 151/21.
MATHEMATICA
f[n_] := Select[Range[n], GCD[ #, n] == 1 &]; g[n_] := Denominator[FromContinuedFraction[Reverse[f[n]]]]; Table[g[n], {n, 27}] (* Ray Chandler, Jan 22 2007 *)
CROSSREFS
KEYWORD
frac,nonn
AUTHOR
Leroy Quet, Jan 19 2007
EXTENSIONS
Extended by Ray Chandler, Jan 22 2007
STATUS
approved