调整R语言ggplot代码修改所有文本颜色的快捷实现方法

解决方案 #

你只需要在原有代码的theme()配置中补充2行参数，即可批量将所有文本、标签、刻度的颜色统一设置为指定的#CC0E44，不需要逐个修改各个文本属性：

ggplot(Alldata, aes(Date)) + 
  geom_tile(aes(alpha = Recession, y = 1), fill = "grey", height = Inf) + 
  scale_alpha_continuous(range = c(0, 1),
                         breaks = c(0, 1), labels = c("0" = "Expansion", "1" = "Recession"))+
  geom_line(aes(y = INFEX), col = "blue", size = .8)+ 
  ylab('Inflation Expectations (%)')+
  labs(x = NULL, alpha = "Economic Cylcle", color = "Economic Variable",
       title = "Rising Inflation Expectations in 2021",
       caption = 'Cleveland Fed Model of 10-year Inflation Expectations',
       subtitle = '"Directionality Matters"')+
  theme(plot.background = element_blank(),
        panel.grid.minor = element_blank(),
        panel.grid.major= element_blank(),
        # 新增以下2行即可完成所有文本配色修改
        text = element_text(color = "#CC0E44"),
        axis.text = element_text(color = "#CC0E44"))

参数说明 #

• text = element_text(color = "#CC0E44")：批量匹配所有全局文本属性，覆盖标题、子标题、注释、坐标轴标签、图例标题/标签的颜色
• axis.text = element_text(color = "#CC0E44")：坐标轴刻度数值默认继承自axis.text参数，单独设置即可覆盖刻度文本颜色

如果你之后需要统一调整字体、字号等全局文本属性，直接在上述两个element_text中添加对应参数即可。

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