A064846 - OEIS

A064846

Let r_1 = 1; r_{n+1} = [r_1; r_2, r_3,..., r_n]; n-th term is denominator of r_n.

1, 1, 1, 3, 18, 720, 1119600, 2726809311600, 16145931379144511904735600, 566327308576692897981544319968226968281922500063600

(list; graph; refs; listen; history; text; internal format)

OFFSET

1,4

COMMENTS

[r_1; r_2, r_3,..., r_n] is a continued fraction, where the r's are rationals. limit{n -> infinity} r_n = 1.7118691868...

LINKS

MATHEMATICA

r[1] := 1; r[n_] := r[n] = FromContinuedFraction[Table[r[i], {i, 1, n - 1, 1}]]; a[n_] := Denominator[r[n]]

CROSSREFS

KEYWORD

easy,frac,nonn

AUTHOR

Leroy Quet, Oct 31 2001; definition corrected May 04 2008

STATUS

approved