很抱歉,如果这是一个重复的问题,但我无法从其他帖子中找到它,因为我还在学习R.我想在剧情中放置3条随机线但是当我运行我的代码时它只是情节原始图表上的第3行。
我的代码......
r=0.19
N=rep(0,50)
N[1]=13
K=130
for(t in 1:50){
N[t+1]= N[t] + N[t]*r*(1-(N[t]/K))}
plot(1:51, N, type="l", lwd=3, xlab="Time")
K=130
Ns=rep(0,50)
Ns[1]=13
for(t in 1:50){
r=rnorm(1, .19, 0.13)
Ns[t+1]= Ns[t] + Ns[t]*r*(1-(Ns[t]/K))}
plot(1:51, N, type="l", lwd=3, xlab="Time")
lines(1:51, Ns, lwd=3, col='blue')
lines(1:51, Ns, lwd=3, col='green')
lines(1:51, Ns, lwd=3, col='red')
答案 0 :(得分:0)
您没有重新生成随机参数,因此您的所有行都使用相同的Ns
。也就是说,它们彼此淹没,你只看到其中一个。