使用Trellis保存符号以进行绘图

Question

我在xyplot（）中的绘图如下所示。我用print（panel.points（））将符号放在图上并且它可以工作。但是我需要将点与点保存到变量（示例中的a），这样我就可以使用网格排列将它与同一图片中的其他图组合。想法？

dev.off()
x <- c(1:10)
y <- c(1:10)

a <- xyplot(y ~ x, type = "l")

trellis.focus("panel", 1, 1, highlight = FALSE) 

print(panel.points(x[c(5,10)], 
               y[c(5,10)], 
               pch = 19, 
               cex = 0.75, 
               col = c("red", "black")))

Answer 1

在调用panel.points的{​​{1}}函数中使用panel来执行主图：

panel.xyplot