占个坑：Rpdf导出图片中文字符乱码怎么解决？(已填坑)

当图片里的文字既有英文也有中文的时候，中文变成了...，网上有中文导出不乱码的解决方法，换一个中文字体，但是这时候英文也变成了中文字体，就不好看了，不知道怎么让中文英文按照它们自己的字体格式导出

pdf("p1.pdf",family="GB1")
p1
dev.off()

用中文字体导出的时候是下图的效果，其他图注也变成了中文字体:

---

今天把坑给补上,解决方法是从这里找到的:在 R 中导出为 pdf 时未显示 Unicode 字符

ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 
## \U1F321是小温度计图标

pdf("plot_normal.pdf")
ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 
dev.off()

cairo_pdf("plot_cairo.pdf")
ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + ggtitle("Temperature range \U1F321") 
dev.off()

图像在R里展示是：

左边是普通的pdf导出，右边是cairo_pdf导出

就可以正常展示了
我个人是需要展示一个中文样式的→，

cairo_pdf("out_fig/plot_cairo.pdf")
ggplot(mtcars, aes(x=cyl, y=mpg)) + geom_point() + xlab("today→yesterday")
dev.off()