2013-04-17 40 views
0

对不起,如果这是一个重复的问题,但我无法从其他帖子中找出它,因为我还在学习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') 
+2

您正在绘制三条相同的线条 - 您还期望看到什么? – sashkello

+0

我认为既然它是随机的,它会产生3条不同的线,因为如果我只做了第一条线,那么每次运行它都会有所不同。 – Southard

+0

谢谢修复它使Ns1,Ns2和Ns3。我认为这是一个简单的解决方法,但是我上周刚刚介绍过,直到今天才再次看到它。 – Southard

回答

0

你是不是你的再生随机参数,因此所有线路使用同一Ns。也就是说,他们被淹死在彼此之上,你只能看到其中的一个。

相关问题