解決するのに苦労している2つの問題があります。最初に、lattice を使用して複数列のマトリックス プロットを実行するxyplot
と、すべての点が接続されていることがわかります。別の切断された回線を取得するにはどうすればよいですか?
x<-cbind(rnorm(10),rnorm(10))
xyplot(x~1:nrow(x),type="l")
第二に、ある線を他の線より太くする方法がわかりません。たとえば、列 1 が必要な場合、列 1 の線は列 2 の線よりも太くなります。
格子プロットのパラダイムは、それに続く ggplot2 のパラダイムと同様に、データがデータフレームで長い形式であると想定しています。
dfrm <- data.frame( y=c(rnorm(10),rnorm(10)),
x=1:10,
grp=rep(c("a","b"),each=10))
xyplot(y~x, group=grp, type="l", data=dfrm, col=c("red","blue"))
これは最も洗練されたソリューションではないかもしれませんが、仕事は完了します:
x<-cbind(rnorm(10),rnorm(10))
plot1<-xyplot(x[,1]~1:nrow(x),type="l",col="red",lwd=3)
plot2<-xyplot(x[,2]~1:nrow(x),type="l")
library(latticeExtra)
plot1+plot2
観測数に対してプロットされた V1 と V2 が必要であると仮定しました。それ以外の場合は、実際には 1 行しかありません。好みに応じて軸とラベルを調整できます。