|
| |
|
|
A064846
|
|
Let r_1 = 1; r_{n+1} = [r_1; r_2, r_3,..., r_n]; n-th term is denominator of r_n.
|
|
4
| | |
|
|
|
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...
|
|
|
MATHEMATICA
| r[1] := 1; r[n_] := r[n] = FromContinuedFraction[Table[r[i], {i, 1, n - 1, 1}]]; a[n_] := Denominator[r[n]]
|
|
|
CROSSREFS
| Cf. A053978, A064845.
Sequence in context: A188801 A070953 A163261 * A157544 A202946 A000853
Adjacent sequences: A064843 A064844 A064845 * A064847 A064848 A064849
|
|
|
KEYWORD
| easy,frac,nonn
|
|
|
AUTHOR
| Leroy Quet Oct 31 2001; definition corrected May 04 2008
|
| |
|
|
