从ggplot对象提取面板大小

Question

我尝试从ggplot对象中提取面板的宽度和高度。到目前为止，我所做的事情：

library(ggplot2)
library(gtable)
# Create object
p <- ggplot(iris, aes(x = Sepal.Length)) +
  geom_histogram()
# Convert the plot to a grob
gt <- ggplotGrob(p)
# Extract panel
panel <- gtable_filter(gt, "panel")

现在，我正要提取正确的尺寸。知道如何进行吗？

Answer 1

panel$widths将返回1null。这是ggplot2的一个功能：面板的大小设置为可以扩展以填充视口上的可用空间。