簡単折れ線グラフ

Rではループを使わないようにするのがよいのだが・・・
"PlotTest.txt"なるファイルが次のようにあるとする。

19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	9	9	9	0	0
19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	18	18	17	15	15	9	0	0
19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	14	4	0	0	0
19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	19	10	10	5	0	0

Rのコマンドで

dm<-matrix(scan(file="PlotTest.txt"),ncol=4)
for(i in 1:ncol(dm)){
plot(dm[,i],type="l")
par(new=T)
}

とすると掲載図。

• "matplot(dm,type="l")"という関数でも描ける由、コメントで教えていただきました