我正在尝试通过此功能绘制图形:
f=function(x)
{
m=0
n=1
o=0
for(i in 1:x){
o=m+n
m=n
n=o
}
}
尝试使用绘图和曲线功能,但总是收到错误消息
答案 0 :(得分:1)
您的函数似乎正在计算Fibonnaci数。
纠正功能后,将可以进行以下操作。
f <- function(x){
m <- 0
n <- 1
o <- 0
for(i in 1:x){
o <- m + n
m <- n
n <- o
}
n
}
g <- Vectorize(f, 'x')
plot(1:10, g(1:10), type = "l")