r - R の同じプロット内の複数の行

Question

これが繰り返しの質問である場合は申し訳ありませんが、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')

Answer 1

ランダム パラメータを再生成していないため、すべての行で同じNs. つまり、それらは互いに重なっていて、そのうちの 1 つしか見えません。