在R中覆盖没有轴标题的图（没有ggplot2）

Question

我无法在论坛上的任何地方找到我的问题的答案。我现在有两个情节，其中一个是另一个情节的放大。例如，我有以下内容：

    attach(mtcars)
plot(wt, mpg, main="Scatterplot Example", 
     xlab="Car Weight ", ylab="Miles Per Gallon ", pch=19)

plot(wt, mpg, main="Scatterplot Example", 
     xlab="Car Weight ", ylab="Miles Per Gallon ", pch=19, xlim=c(0, 3) )

我试图将第二张图（将xlim放在图的右上角）覆盖在这张照片中。

首先，我尝试将绘图分配到一个角色，然后使用下面的代码，但这并不起作用。

vp <- viewport(x=0.78,y=0.75,width=0.35, height=0.338)

full <- function() {
  print(g1)
  theme_set(theme_bw(base_size = 8))
  print(subplot2, vp = vp)
}

full()

为了澄清，g1是大图，而subplot2是我想要叠加的图。

非常感谢任何帮助。有没有办法让叠加层发生？

Answer 1

您可以像这样使用par(fig=c(0.5,1,0.5,1), new=TRUE)。 fig选项中的数字是x0，x1，y0，y1，表示绘图的百分比。在这种情况下，图形在x轴的50％处开始（x0）并且在原始轴的100％处结束（x1）。

plot(wt, mpg, main="Scatterplot Example", 
     xlab="Car Weight ", ylab="Miles Per Gallon ", pch=19)
par(fig=c(0.5,1,0.5,1), new=TRUE)
plot(wt, mpg, main="", 
     xlab="Car Weight ", ylab="Miles Per Gallon ", pch=19, xlim=c(0, 3) )