Advertisement
Guest User

Untitled

a guest
Mar 27th, 2017
43
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.21 KB | None | 0 0
  1. Clear[f];
  2. rsol = RSolve[{f[n] == f[n - 1] + f[n - 2], f[0] == 0, f[1] == 1}, f, n]
  3. (* {{f -> Function[{n}, Fibonacci[n]]}} *)
  4.  
  5. Limit[f[n]/f[n - 1] /. First[rsol], n -> Infinity]
  6. (* 1/2 (1 + Sqrt[5]) *)
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement