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与观察数量相对应。 否则你确实只有一行。 您可以根据口味调整轴和标签。