r - ggplot2:调用打印方法时抑制绘图

Question

作为 this question 的跟进，假设我做了这样的事情:

p <- ggplot(mtcars, aes(mpg)) + geom_histogram(aes(y = ..count..)) + facet_wrap(~am)
r <- print(p)

在第二行中，我调用了 print 方法，这样我就可以在向绘图对象添加附加层之前以编程方式检查其返回值。

我的问题:有没有办法在那个时候抑制绘图？

Answer 1

如果您查看 ggplot2:::print.ggplot，您会发现您可能想要使用的是 ggplot_build() 或 ggplot_gtable( )，这取决于您要检查的信息。

ggplot_build 返回由 ggplot2 的 print 方法无形返回的数据对象，所以这可能就是您想要的。 ggplot_gtable 返回 grobs 本身，这允许直接修改网格图形对象本身。