ggplot2将所有使用的字体嵌入pdf，R中

Question

我正在使用qplot和ggplot绘制一些数字。 在绘图之前，我调用pdf()并使用dev.off()保存该绘图。 我必须将所有字体嵌入pdf中。 我怎样才能做到这一点？ 在绘图时还是对pdf进行后处理以嵌入字体？

Answer 1

这样成功了：

embedFonts( path.expand("~/Rplots.pdf") )

这不是，（因此，通过实验，我确定embedFonts需要完整路径，并且不会进行“波浪扩展”）：

embedFonts("~/Rplots.pdf")
... snipped a bunch of inscrutable error messages
GPL Ghostscript 9.16: Unrecoverable error, exit code 1
Error in sprintf(gettext(fmt, domain = domain), ...) : 
  object 'cmd' not found

尽管它确实表明我安装了Ghostscript的功能，这是embedFonts的要求。 （我的Ghostscript副本可能来自我安装的Tex。）

Answer 2

您需要对pdf文件进行后处理以嵌入字体。 使用dev.off()关闭设备后，您可以使用

embedFonts(file=filepath_fonts_not_embedded, outfile=filepath_fonts_embedded)