r - 从R函数中生成多个图形

Question

我想使用ggplot图形从R中的一个函数中生成几个图形窗口...

testf <- function(a, b) {
  devAskNewPage(TRUE)
  qplot(a, b);
  # grid.newpage(recording = TRUE)
  dev.new()
  qplot(a, a+a);
  # grid.newpage(recording = TRUE)
  dev.new()
  qplot(b, b+b);
}

library(ggplot2)

x <- rnorm(50)
y <- rnorm(50)
testf(x, y)

但是，dev.new()和grid.newpage()似乎都无法刷新前面的图。

我知道，在R中，函数通常只会产生它们评估的最后结果，但是我想更好地理解过程并了解任何可能的解决方法。

有什么想法吗？

Answer 1

点阵和ggplot2中基于网格的图形函数创建一个图形对象，但不显示它。图形对象的print()方法产生实际的显示，即

print(qplot(x, y))

解决了问题。

参见 R FAQ 7.22。