绘制观察到的Vs在莱迪思的同一图表上预测变量

Question

我试图在lattice的同一个地块上绘制观测和预测变量。我的数据是一个重复的数据集，我尝试了一些没有用的东西。任何援助将不胜感激。代码如下。

library(nlme)
library(lattice)
# add random conc predictions to data
Theoph$predConc <- rnorm(132, 5)

# My attempt at plotting both predConc and conc against time on the same plot
lattice::xyplot(predConc + conc ~ Time | Subject, groups=Subject, data=Theoph, type="l", layout = c(4,4))

正如您所看到的，它似乎并没有按照我的意愿去做。理想情况下，我希望“浓缩”和“predConc”具有不同的颜色，但每个面板上的每个ID都会出现在一起，因此我可以轻松地比较两者。

Answer 1

正如评论中所建议的那样，只需删除groups = Subject即可解决。

lattice::xyplot(predConc + conc ~ Time | Subject, data = Theoph, type = "l",
                auto.key = TRUE)