【R】グラフの重ねあわせ

データをCSVから読み込む。

> random.csum<-read.csv("data.csv")

データを確認する。

> head(random.csum)
  X1 X2 X3 X4 X5 X6 X7 X8 X9 X10 X11 X12 X13 X14 X15 X16 X17 X18 X19 X20 X21
1  0  1  0  0  0  0  0  1  0   1   0   0   1   0   0   0   0   0   0   0   0
2  1  1  0  0  0  0  0  1  1   1   0   0   1   0   0   1   0   0   0   1   1
3  2  1  0  0  1  0  0  1  1   1   0   0   1   0   1   1   0   0   0   1   1
4  2  1  0  0  1  0  0  1  1   1   0   0   1   0   1   2   0   1   0   1   1
5  2  1  0  0  1  0  0  1  2   1   0   0   1   0   2   2   0   1   0   1   2
6  2  1  0  0  1  1  0  1  2   1   0   1   1   0   2   2   0   1   0   1   2

各列毎にベクトルにする。

> x1csum<-random.csum.matrix[,1]
> x2csum<-random.csum.matrix[,2]

グラフの重ね合わせにpar(new=T)を使用する。par(new=T)は使用すべきではない。軸がずれる。

> plot(x1csum,col="red",type="l")
> par(new=T)
> plot(x2csum,col="blue",type="l")

（追記）
r-de-rさんから、貴重なコメントを頂いた。

par(new=TRUE) は使わない方が良い。縦軸目盛りが一致しなくなる。
せめて，ylim で目盛りが一致するようにするべし。
それよりなにより，plot は1回限り，2回目以降の描画には lines を使うべし。

> plot(x1csum,col="red",type="l")
> lines(x2csum,col="green",type="l")