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

Question

当我们在 ggplot 中使用 facet 选项时，我们会在标题 (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)

成功了。