今天介绍一个修改图片主题风格的R包{hrbrthemes}，能给{ggplot2}作图提供更多选择。
# 安装并载入R包
install.packages("hrbrthemes")
library(hrbrthemes)
library(ggplot2) # 需提前安装：install.packages("ggplot2")
再准备作图数据，使用{ggplot2}中的数据mpg：
data(mpg) # 导入数据
summary(mpg) # 查看数据
首先，R包{hrbrthemes}中带有一系列主题风格，直接使用就可以：
ggplot(mpg, aes(x = displ, y = hwy)) +
geom_point(color = "black") +
theme_ipsum()
ggplot(mpg, aes(x = displ, y = hwy)) +
geom_point(size= 2, color = "gold") +
theme_ft_rc()
ggplot(mpg, aes(x = displ, y = hwy)) +
geom_point() +
theme_modern_rc()
除了一系列函数能修改图片主题，还有其它修改scales的函数，比如调色的函数scale_color_ipsum()/scale_fill_ipsum()；修改坐标轴刻度标签的函数scale_x_percent()/scale_y_percent()等。ggplot(mpg, aes(x = class, y = hwy, color = drv)) +
geom_boxplot() +
scale_color_ipsum() + # ipsum 调色盘
scale_y_percent() # 修改y轴刻度标签为百分比
再比如，想根据自己喜好修改图片主题，可以使用{ggplot2}中的theme()函数：
ggplot(mpg, aes(x = class, y = hwy)) +
geom_boxplot() +
theme_ipsum() +
theme(panel.grid.major = element_line(size = 1.2, color = "palegreen"),
panel.background = element_rect(fill = "grey90"),
axis.title = element_text(size = 12))
ggplot(mpg, aes(x = class, y = hwy, fill = drv)) +
geom_boxplot() +
scale_fill_ipsum() + # ipsum 调色盘
theme_ipsum(base_size = 14, # 精修图片主题
base_family = "Calibri",
axis_title_family = "Rage",
axis_title_size = 12,
plot_title_size = 18,
grid_col = "skyblue"
) +
labs(title = "The Fuel Economy Data",
x = "Types of Car",
y = "Highway MPG")
上述代码中，base_family = "Calibri"和axis_title_family = "Rage"修改了图片上的字体，使用的字体是小编电脑中有的字体。各位读者也可以修改成自己电脑中其它的字体。好啦，今天的内容就到这里。如果有帮助，记得分享给需要的人![]()
！[1]. https://hrbrmstr.github.io/hrbrthemes/index.html
公众号核心成员担任SCI杂志Associate Editor!▌课程相关咨询可添加R师妹微信: kefu_rstats
