r - 在情节中嵌入微型情节

Question

有人知道将情节嵌入其他情节以产生类似下面样机的一般方法吗？

我知道在 lattice 中你可以按照这个问题print(..., more=TRUE, positions=...)的解释来做，我猜 ggplot 也有解决方案（但我对 ggplot 不太擅长）。问题是我想将使用标准图形包的生存包中的常规图嵌入到格子图中。

提前致谢！

Answer 1

这是一种相反的方法，基础图形中的 ggplot2 图形：

require(ggplot2)
require(grid)

plot(sin, -pi, 2*pi)
qp <- qplot(mpg, wt, data=mtcars)
print(qp, vp=viewport(.8, .75, .2, .2))

Answer 2

您可以尝试 gridBase 包，它提供了一些集成基础和基于网格的图形（包括 lattice 和 ggplot2）的功能。下面的示例在格子图中嵌入了一个基本图形图。

library(lattice)
library(gridBase)
library(grid) 

plot.new()
pushViewport(viewport())
xvars <- rnorm(25)
yvars <- rnorm(25)
xyplot(yvars~xvars)
pushViewport(viewport(x=.6,y=.8,width=.25,height=.25,just=c("left","top")))
grid.rect()
par(plt = gridPLT(), new=TRUE)
plot(xvars,yvars)
popViewport(2)

更多细节在这里：http ://casoilresource.lawr.ucdavis.edu/drupal/node/1007 在这里： http : //cran.r-project.org/web/packages/gridBase/vignettes/gridBase.pdf

Answer 3

查看 Teaching Demos 包包TeachingDemos 包- 以及subplot()它可能也适用于晶格的功能 - 不过还没有尝试过。