解决R语言ggplot2包输出带中文字体的矢量图时的乱码问题

众所周知，使用R语言ggplot2包绘图时，如果图中存在中文字体的情况，输出pdf矢量图时会乱码，如下所示的这样。

library(ggplot2)
 
#使用 iris 数据集绘制花瓣长度与宽度的散点图的简单示例
data(iris)
 
p <- ggplot(data = iris, aes(x = Petal.Length, y = Petal.Width, color = Species)) +
geom_point() +  
theme(
    panel.grid = element_blank(), 
    panel.background = element_rect(color = 'black', fill = 'white'),
    legend.key = element_blank()) +
labs(x = '花瓣长度', y = '花瓣宽度', color = '物种')
 
p
 
#输出 pdf 矢量图
ggsave('p.pdf', p, width = 4.5, height = 3)

解决方案一
上述主要原因是缺少字体库，输出矢量图时无法识别对应的中文字体样式。

这时候只需要指定一种包含中文字体样式的库就可以正常输出带中文的矢量图了。

不过由于字体样式更改了，原图中的字体显示风格也会变，但好在文字可以被pdf编辑工具识别（），后续在这些工具中统一调整即可。

#使用函数 cairo_pdf() 在输出