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

思想?

推荐答案

lattice和ggplot2中基于grid的图形函数创建图形对象,但不显示它.graph对象的print()方法产生实际显示,即.,

print(qplot(x, y))

解决了这个问题.

R FAQ 7.22.

R相关问答推荐

强制相关图以显示相关矩阵图中的尾随零

有没有方法将paste 0功能与列表结合起来?

根据固定值范围在tible中添加新行

如何替换R中数据集列中的各种字符串

根据收件箱中的特定值提取列名

如果列中存在相同的字符串,则对行值进行总和

使用tidyverse / Mutate的存款账户余额

terra nearest()仅为所有`to_id`列返回NA

如何自定义Shapviz图?

如何在R中合并两个基准点?

根据日期从参考帧中创建不同的帧

一小时满足条件的日期的 Select

多个模拟序列间的一种预测回归关系

迭代到DataFrame列并获得成对的值列表(col1->;col2、col2->;col3、col3->;col4等)的正确方法.

如何在R中通过多个变量创建交叉表?

使用ifElse语句在ggploy中设置aes y值

用满足特定列匹配的另一行替换NA行

如何计算多个变量的百分比与总和的百分比?

如何准确地指出Read_delim所面临的问题?

在分面的ggplot2条形图中对条形图进行排序,并省略每组未使用的系数级别