#r #plot #lattice
#r #график #решетка
Вопрос:
Я хочу создать график, подобный приведенному ниже минимальному примеру, используя useOuterStrips и doubleYScale из пакета latticeExtra. Это действительно работает тихо, но есть одна серьезная проблема, левые галочки закрыты заголовком панели (0, 1). Как я могу это исправить?
library(lattice)
library(latticeExtra)
mtcars$am = as.factor(mtcars$am)
mtcars$cyl = as.factor(mtcars$cyl)
foo = xyplot(mpg ~ hp|cyl*am, data=mtcars)
bar = xyplot(qsec ~ hp|cyl*am, data=mtcars)
FooBar = doubleYScale(foo, bar)
useOuterStrips(FooBar)