r - 更改 R 中图形的字体

Question

在我的研究中，我使用 R 生成各种图表。我发现大多数图表都带有各种大小的 Sans Serif 字体。

如何将图表中的所有文本(x 标签、y 标签、标题、图例等)更改为统一字体，例如Times New Roman，12pt，粗体？

Answer 1

您可以使用extrafont包裹。

install.packages("extrafont")
library(extrafont)
font_import()
loadfonts(device="win")       #Register fonts for Windows bitmap output
fonts()                       #vector of font family names
##  [1] "Andale Mono"                  "AppleMyungjo"                
##  [3] "Arial Black"                  "Arial"                       
##  [5] "Arial Narrow"                 "Arial Rounded MT Bold"  

library(ggplot2)
data(mtcars)
ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() +     
  ggtitle("Fuel Efficiency of 32 Cars") +
  xlab("Weight (x1000 lb)") + ylab("Miles per Gallon") +
  theme_bw() +
  theme(text=element_text(family="Times New Roman", face="bold", size=12)) #Times New Roman, 12pt, Bold
#example taken from the Github project page

注意:使用 extrafont 包，您还可以将这些字体嵌入 PDF 和 EPS 文件中(在 R 中绘图并导出为 PDF/EPS)。您还可以直接创建数学符号(请参见下图中的数学方程)，通常使用 TeX 创建。更多信息here和 here 。另请参阅github project page 。

另请参阅this描述创建 xkcd 的答案使用 extrafont 包设置图表样式。