调整ggplot代码以更改所有文本颜色的快捷方式-R答案

【问题标题】：Shortcut to adjust ggplot code to change color of all text - R调整ggplot代码以更改所有文本颜色的快捷方式-R
【发布时间】：2021-12-04 14:01:54
【问题描述】：

我正在尝试编辑我的代码以使所有文本和标签都具有以下颜色信息 RGB：（204、14、68）十六进制：#CC0E44 HSL：（243、222、109）

这是我当前的代码及其当前输出

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('Infation 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())

ggplot

感谢您的帮助！

【问题讨论】：

将text = element_text(color = "#CC0E44") 作为theme() 的参数。
我也可以使用'family ='函数来添加times新的罗马字体吗？
我不明白为什么不这样做。
我该怎么做？到目前为止，我发现的想法有问题。

标签： r ggplot2 data-visualization rgb hsl

【解决方案1】：

要设置颜色，请使用以下命令：

theme(text = element_text(color = '#CC0E44'))

添加另一个字体系列：

install.packages("showtext", dependencies = TRUE)
library(showtext)

font_add("Times New Roman", regular = "times.ttf",bold = 'timesbd.ttf', 
italic = 'timesi.ttf', bolditalic = 'timesbi.ttf')

然后在你的情节调用中，在element_text() 中，输入family = 'Times New Roman'。您还可以通过添加face 参数来修改面部。

【讨论】：