OFFSET
1,2
COMMENTS
Consider the following Quet-like continued fraction recursion: x_0 = 1, x_1 = 1 + 1/x_1, x_2 = 1 + 1/(x_1 + 1/x_2), x_3 = 1 + 1/(x_1 + 1/(x_2 + 1/x_3)), ... x_n = 1 + 1/(x_1 + 1/(x_2 + 1/(x_3 + ... + 1/x_n))).
REFERENCES
Paul D. Hanna, in a posting to sci.math news group entitled 'Limit of Continued Fraction Recursion' dated Jul 29 2002, 12:22.
EXAMPLE
Initial convergents are: x_0 = 1, x_1 = 1.618033988749895, x_2 = 1.431683416590579, x_3 = 1.477931798482607, x_4 = 1.466017958390778, x_5 = 1.469072006453889, x_6 = 1.468289031006081, x_7 = 1.468489818230137, x_8 = 1.468438335506229, x_9 = 1.468451536645148, x_10 = 1.46844815169046, ...
MAPLE
f := proc(m, n) local u, x, expr, k; expr := x; u := 1; for k to n do expr := simplify(subs(x = u + 1/x, expr)); u := fsolve(x = expr, x = 0 .. 2); if m < k then print(k, u) end if end do end proc
CROSSREFS
KEYWORD
nonn,cons
AUTHOR
Paul D. Hanna, Robert G. Wilson v and Denis Feldmann (denis.feldmann(AT)wanadoo.fr), Jul 29 2002
STATUS
approved