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。 否則，您實際上只有一行。 您可以根據口味調整軸和標簽。