我附上了一个538情节的屏幕截图-- o.png?oh=aa7436a960f2982deed7a90c997f31e4&oe=5A45A9E7 --并且我试图以类似的方式格式化我的in图。我目前正在挣扎的部分是底部的深灰色阴影。我这里有一个演示情节:
ggplot(iris, aes(x = Sepal.Length, y = Sepal.Width)) + 
  geom_point() + 
  theme(plot.background = element_rect(fill = 'gray95'),
        panel.background = element_rect(fill = 'red')) + 
  labs(caption = 'mycaption')panel.background将整个面板涂成红色,而plot.background则将所有东西都涂成灰色。我很熟悉geom_rect(),但是根据我所读到的内容,这些只能放在面板中,其中包含xmin/xmax/ymin/ymax的参数.我是否可以在整个图的底部添加一个geom_rect(),而不仅仅是x和y坐标之间面板的底部?
让我知道这是否有意义,否则我可以解释更多。
谢谢!
发布于 2017-10-07 19:35:02
在这个站点上已经有了几个答案;这里有一个方法:
library(gridExtra)
fthbar <- grobTree(rectGrob(gp=gpar(fill="grey50",col=NA)),
                   textGrob("LEFT", x=0, hjust=0, gp=gpar(col="white")), 
                      textGrob("RIGHT", x=1, hjust=1, gp=gpar(col="white")), cl="ann")
heightDetails.ann <- function(x) unit(1,"line")
grid.arrange(qplot(rnorm(10),rnorm(10)), bottom = fthbar)

https://stackoverflow.com/questions/46616402
复制相似问题