Запланированное наблюдение 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)) 

Как вы можете видеть, похоже, что он не делает то, что я хочу. В идеале я хотел бы, чтобы «conc» и «predConc» были разных цветов, но отображались вместе на каждой панели для каждого Id, чтобы я мог легко сравнить их.

Answer 1

Как было предложено в комментариях, оно фиксируется просто путем удаления groups = Subject.

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