CoCalc Public FilesFibonacci.ipynbOpen with one click!
Authors: Luc Eveleigh, luc-eveleigh
Views : 36
Compute Environment: Ubuntu 20.04 (Default)
In [2]:
# Program to display the Fibonacci sequence up to n-th term using recursive functions recurse_fibonacci <- function(n) { if(n <= 1) { return(n) } else { return(recurse_fibonacci(n-1) + recurse_fibonacci(n-2)) } } # take input from the user nterms = as.integer(readline(prompt="How many terms? ")) # check if the number of terms is valid if(nterms <= 0) { print("Plese enter a positive integer") } else { print("Fibonacci sequence:") for(i in 0:(nterms-1)) { print(recurse_fibonacci(i)) } }
How many terms?
[1] "Fibonacci sequence:" [1] 0 [1] 1 [1] 1 [1] 2 [1] 3 [1] 5 [1] 8 [1] 13 [1] 21 [1] 34
In [ ]: