如何在ggplot2 v3.3.2中将facet_grid的label_both设为默认

当然可以搞定！针对你用的ggplot2 3.3.2版本，我给你两个实用的方案，既能全局设置默认值，也能灵活绑定特定主题或自定义函数：

方案1：全局修改facet_grid的默认参数 #

如果你希望所有facet_grid调用都自动使用label_both，直接修改函数的默认参数就好，一步到位：

# 先加载ggplot2包
library(ggplot2)

# 修改facet_grid的labeller默认值为label_both
formals(facet_grid)$labeller <- label_both

之后你再写代码时，完全不用手动加labeller = label_both，效果和你原来的示例代码完全一致：

# 测试代码，无需指定labeller
ggplot(mtcars,aes(x=disp,y=mpg))+geom_point()+facet_grid(cyl~am)

注意：这种全局修改在重启R会话后会恢复默认。如果想永久生效，可以把上述修改代码放到你的.Rprofile文件中，每次启动R都会自动加载。

方案2：自定义分面函数（灵活绑定主题） #

如果你不想全局改变所有facet_grid的行为，只想在特定场景下使用label_both，可以封装一个自己的分面函数，还能和自定义主题搭配使用：

2.1 封装自定义分面函数 #

写一个专属的分面函数，默认启用label_both：

facet_grid_both <- function(...) {
  facet_grid(..., labeller = label_both)
}

使用时直接调用这个自定义函数即可：

ggplot(mtcars,aes(x=disp,y=mpg))+geom_point()+facet_grid_both(cyl~am)

2.2 搭配自定义主题 #

需要注意的是，ggplot的theme()本身并不直接控制分面的labeller参数（主题负责外观样式，比如标签字体、背景色），但你可以把自定义分面函数和主题组合起来，形成一套自己的绘图模板：

# 自定义主题（这里示例加了条纹背景色，你可以按需调整）
theme_my_style <- function(...) {
  theme_minimal(...) +
    theme(strip.background = element_rect(fill = "#e8f4f8"),
          strip.text = element_text(color = "#2c3e50"))
}

# 组合使用：自定义分面+自定义主题
ggplot(mtcars,aes(x=disp,y=mpg))+
  geom_point(color = "#3498db")+
  facet_grid_both(cyl~am)+
  theme_my_style()

内容的提问来源于stack exchange，提问作者Misha