R格子绘制具有特定颜色的多条线

Question

我有两个要解决的问题。 首先，当我使用格子xyplot进行多列矩阵绘图时，我发现所有点都已连接。 如何获得单独的断开线路？

x<-cbind(rnorm(10),rnorm(10))
xyplot(x~1:nrow(x),type="l")

其次，我很难弄清楚如何使一根线比另一根线更粗。 例如，假设我要第1列，那么第1列的行将比第2列的行粗。

Answer 1

像其后的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"))

Answer 2

这可能不是最优雅的解决方案，但可以完成工作：

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。 否则，您实际上只有一行。 您可以根据口味调整轴和标签。