r - 在 R 中的多面板图中更改绘图面板

Question

这个问题在这里已经有了答案:





Plot to specific plot in multiple-plot window?

(4 个回答)


8年前关闭。




我希望能够在 R 中跟踪具有多个图的正在运行的模拟。 最简单的方法是创建一个多面板图(在我的情况下，我只使用 par(mfrow = c(2,2)) )，然后绘制四个图中的每一个反过来。问题是它每次都必须完全重绘绘图，每次函数到达最后一个(第 4 个)面板时，整个窗口都会被重绘。我想要的是能够回到例如第一个面板，然后在前一个面板上绘制下一个点。如果这是单独的窗口，我可以使用 dev.set() 在它们之间进行更改，但是面板有类似的东西吗？

Answer 1

如果您将绘图设置为正确的最终尺寸，您可以使用 par(mfg=在面板之间切换并添加到它们。

一个例子:

pars <- c('plt','usr')

par(mfrow=c(2,2))

plot(anscombe$x1, anscombe$y1, type='n')
par1 <- c(list(mfg=c(1,1,2,2)), par(pars))
plot(anscombe$x2, anscombe$y2, type='n')
par2 <- c(list(mfg=c(1,2,2,2)), par(pars))
plot(anscombe$x3, anscombe$y3, type='n')
par3 <- c(list(mfg=c(2,1,2,2)), par(pars))
plot(anscombe$x4, anscombe$y4, type='n')
par4 <- c(list(mfg=c(2,2,2,2)), par(pars))

for( i in 1:11 ) {
    par(par1)
    points(anscombe$x1[i], anscombe$y1[i])
    Sys.sleep(0.5)
    par(par2)
    points(anscombe$x2[i], anscombe$y2[i])
    Sys.sleep(0.5)
    par(par3)
    points(anscombe$x3[i], anscombe$y3[i])
    Sys.sleep(0.5)
    par(par4)
    points(anscombe$x4[i], anscombe$y4[i])
    Sys.sleep(0.5)
}