在ggplot2中的图表标题周围放置一个灰色框

Question

当我们facet在ggplot中使用选项时,我们会在标题周围找到一个漂亮的灰色框(3,4,5).

library(ggplot2)

data(mtcars)

ggplot(mtcars, aes(cyl)) + geom_bar() + facet_wrap(~gear) + theme_bw()

当我们不使用该facet选项时,我们如何在图表标题周围放置一个类似的灰色框？

ggplot(mtcars, aes(cyl)) + geom_bar() + theme_bw() +
  ggtitle("How do you put a grey box around me??")

Answer 1

因为你问的是如何在没有方面的情况下做到这一点,严格来说这不是一个答案,但只是指出它,一个快速而肮脏的方式是"欺骗"并毕竟使用一个方面.例如,

mtcars$title <- "How do you put a grey box around me??"
ggplot(mtcars, aes(cyl)) + geom_bar() + theme_bw() +
  facet_grid(. ~ title)

诀窍.