Слияние или наложение xyplots в решетчатой панели

Попытка выяснить, как добавить точки или ряды данных к существующей панели решетки после ее создания. Это имеет какое-то отношение к plot.points и/или к функции обновления?

# Initialize first plot
library(lattice)
a <- xyplot(Sepal.Length~Sepal.Width, groups=Species, data=iris
            , subset=Species %in% levels(Species)[1:2])
print(a) 

# Create second plot to overlay or merge with the first plot
b <- xyplot(Sepal.Length~Sepal.Width, groups=Species, data=iris
            , subset=Species %in% levels(Species)[3])

# Initial attempt at merging plots:
library(latticeExtra)
print(c(a,b)) # this displays the data in an adjacent second panel
print(c(a,b,layout=c(1,1))) # and this only shows series "b"

Примечание: в этом примере обе графики "a" и "b" относятся к исходному диафрагму, но в идеале решение будет работать с различными фреймами данных.

Любые идеи? Спасибо!
Bryan

Ответ 1