从 R 函数内生成多个图形

发布于 2024-08-27 07:29:25 字数 457 浏览 4 评论 0原文

我想使用 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 中，函数通常只产生它们评估的最后一个结果，但我想更好地理解这个过程并了解任何可能的解决方法。

想法？

原文

I'd like to spawn several graphics windows from within a function in R using ggplot graphics...

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)

However, neither dev.new() nor grid.newpage() seems to flush the preceding plot.

I know that, in R, functions normally only produce the last thing they evaluate, but I'd like to understand the process better and to learn of any possible workarounds.

Thoughts?

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

演多会厌 2024-09-03 07:29:25

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

print(qplot(x, y))

解决了问题。

请参阅R 常见问题解答 7.22< /a>.

The grid-based graphics functions in lattice and ggplot2 create a graph object, but do not display it. The print() method for the graph object produces the actual display, i.e.,