禁用ggplots的cowplot默认值

Question

ggplot2附加软件包cowplot具有很好的功能，可以绘制多个名为plot_grid()的图。这里的plot_grid()正在行动中：

library(ggplot2); library(cowplot)

plot_a <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
plot_b <- ggplot(mtcars, aes(mpg, disp)) + geom_point()

plot_grid(plot_a, plot_b, labels = c("A", "B"))

但请注意加载cowplot如何更改默认的绘图样式。如何加载cowplot包以便我可以使用plot_grid()函数，还可以禁用cowplot强制执行的默认打印样式？

Answer 1

请事先致电theme_set(theme_gray())：

theme_set(theme_gray())
plot_grid(plot_a, plot_b, labels = c("A", "B"))

然后，如果您想对主题感到疯狂，可以安装ggthemes，只需将theme_gray()替换为您选择的任何主题，或者自行滚动。另请参阅this vignette以确定单个元素的样式。

Answer 2

正如评论中所述，一旦安装了cowplot软件包，您就可以使用plot_grid()运算符加载::函数（请参阅What are the double colons (::) in R?）并获取cowplot不要更改任何ggplot2默认值。

> plot_a <- ggplot(mtcars, aes(mpg, wt)) + geom_point()
> plot_b <- ggplot(mtcars, aes(mpg, disp)) + geom_point()
> plot_grid(plot_a, plot_b, labels = c("A", "B"))
Error in plot_grid(plot_a, plot_b, labels = c("A", "B")) : 
  could not find function "plot_grid"

> cowplot::plot_grid(plot_a, plot_b, labels = c("A", "B"))

当您使用cowplot或library()加载整个require()包时会出现此问题。