如何在使用 ggplot2 创建的 PDF 绘图中使用 Unicode 字符作为标签、标题和类似内容？
考虑以下示例：
library(ggplot2)
qplot(Sepal.Length, Petal.Length, data=iris, main="Aʙᴄᴅᴇғɢʜɪᴊᴋʟᴍɴᴏᴘǫʀsᴛᴜᴠᴡxʏᴢ")
ggsave("t.pdf")
绘图的标题使用 Unicode 字符（小型大写字母），在输出中显示为...。该问题仅出现在 pdf 图上；如果我将最后一行替换为ggsave("t.png")，那么输出就是预期的。
我究竟做错了什么？我的 R 脚本采用 UTF-8 编码。一些系统信息：
R version 2.14.1 (2011-12-22)
Platform: x86_64-pc-linux-gnu (64-bit)
locale:
[1] LC_CTYPE=en_US.UTF-8 LC_NUMERIC=C
[3] LC_TIME=en_US.UTF-8 LC_COLLATE=en_US.UTF-8
[5] LC_MONETARY=en_US.UTF-8 LC_MESSAGES=en_US.UTF-8
[7] LC_PAPER=C LC_NAME=C
[9] LC_ADDRESS=C LC_TELEPHONE=C
[11] LC_MEASUREMENT=en_US.UTF-8 LC_IDENTIFICATION=C
attached base packages:
[1] stats graphics grDevices utils datasets methods base
在寻找这个问题的解决方案时，我发现了一些evidenceR 使用单字节编码进行多字节编码，例如用于 PDF 或 postscript 输出的 UTF-8。我还找到了一些建议，例如，能够获得欧元符号工作，但没有通用的解决方案。
正如本建议的那样，cairo_pdf()是你的朋友。它还允许您通过以下方式在 PDF 中嵌入非 Postscript 字体（即 TTF/OTF）：family参数（如果您碰巧没有任何包含您要使用的字形的 postscript 字体，则至关重要）。例如：
library(ggplot2)
cairo_pdf("example.pdf", family="DejaVu Sans")
qplot(Sepal.Length, Petal.Length, data=iris, main="Aʙᴄᴅᴇғɢʜɪᴊᴋʟᴍɴᴏᴘǫʀsᴛᴜᴠᴡxʏᴢ")
dev.off()
...gives a PDF that looks like this:
也可以看看这个问题;尽管从标题来看它并没有直接相关，但其中有很多关于如何让字体在 R 中实现您想要的功能的内容。
EDIT根据评论中的请求，以下是特定于 Windows 的代码：
library(ggplot2)
windowsFonts(myCustomWindowsFontName=windowsFont("DejaVu Sans"))
cairo_pdf("example.pdf", family="myCustomWindowsFontName")
qplot(Sepal.Length, Petal.Length, data=iris, main="Aʙᴄᴅᴇғɢʜɪᴊᴋʟᴍɴᴏᴘǫʀsᴛᴜᴠᴡxʏᴢ")
dev.off()
使用基本图形命令cairo_pdf()只需使用以下命令定义您的字体系列就足够了windowsFonts()先命令，如上图。当然，请确保您使用系统上实际拥有的字体，并且该字体实际上具有您需要的所有字形。
下面的评论中有关 DLL 文件的说明是我必须做的才能获得Cairo() and CairoPDF()命令在library(Cairo)在 Windows 上工作。然后：
library(ggplot2)
library(Cairo)
windowsFonts(myCustomWindowsFontName=windowsFont("DejaVu Sans"))
CairoPDF("example.pdf")
par(family="myCustomWindowsFontName")
qplot(Sepal.Length, Petal.Length, data=iris, main="Aʙᴄᴅᴇғɢʜɪᴊᴋʟᴍɴᴏᴘǫʀsᴛᴜᴠᴡxʏᴢ")
dev.off()