我正在尝试从我制作的此功能中绘制图形:
f=function(x)
{
m=0
n=1
o=0
for(i in 1:x){
o=m+n
m=n
n=o
}
}
尝试使用图和曲线功能,但始终获得错误消息
您的功能似乎是在计算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")