Fibonacci 数列的R语言实现

最新推荐文章于 2022-08-03 21:22:07 发布

2018每天打卡

最新推荐文章于 2022-08-03 21:22:07 发布

阅读量8.9k

点赞数 2

分类专栏： R 文章标签：语

本文链接：https://blog.csdn.net/jqm299299/article/details/80400563

版权

R 专栏收录该内容

25 篇文章 0 订阅

订阅专栏

#time is slow，用递归来写，直观，但是时间太慢
Fibonacci <- function(n)
{
  if(n == 1|n == 2)
  {
    return(1)
  }
  else
  {
    return(Fibonacci(n-1) + Fibonacci(n - 2))
  }
}
Fibonacci(11)

#非递归的算法

Fibonacci <- function(n)
{
  f1 <- 1
  f2 <- 1
  if(n == 1|n == 2)
  {
    return(f2)
  }
  else
  {
    for(i in 3:n)
    {
      temp1 <- f2
      f2 <- f1 + f2
      f1 <- temp1
    }
    return(f2)
  }
}
Fibonacci(39)