保存为 PDF 时，如何使 R 绘图使用 Latin Modern 字体系列？

Question

如果我输入

par(family='CM Roman')

然后我可以得到一个用 Computer Modern 字体显示的图。但是，当我尝试将其另存为 PDF 时，它会显示为空白文档，这与我删除该行不同。

如何才能将其正确保存为 PDF？

另外，我如何使用拉丁现代而不是计算机现代？

Answer 1

我在 Windows 中是这样做的：

1. 安装extrafont软件包。
2. 安装拉丁现代字体，例如来自http://www.fontsquirrel.com/fonts/latin-modern-roman。注意，您需要安装TTF 版本的字体，font_import()无法处理 OTF。
3. 使用 导入字体font_import()。
4. 使用 加载字体loadfonts(device = "win")。使用该device = "Win"参数使 R Studio 中的预览正常工作。
5. 使用 设置字体系列图形参数par(family = "LM Roman 10")。
6. 现在可以在 R Studio 中绘图，并且可以导出 pdf（参见下图）。

这是您需要使用的完整代码：

# Run once
install.packages("extrafont")
library(extrafont)
# Install **TTF** Latin Modern Roman fonts from www.fontsquirrel.com/fonts/latin-modern-roman
# Import the newly installed LModern fonts, change the pattern according to the 
# filename of the lmodern ttf files in your fonts folder
font_import(pattern = "lmroman*")


# Run each time
library(extrafont)
loadfonts(device = "win")
par(family = "LM Roman 10")
x <- seq(1, 10, 1)
y <- seq(1, 10, 1)
plot(y ~ x, main="This plot uses LaTeX font!", ylab = expression(alpha))

R工作室预览：

导出的pdf：