更改ggplot2中的字体

Question

更改ggplot2中的字体

曾几何时，我ggplot2使用windowsFonts(Times=windowsFont("TT Times New Roman"))改变它来改变我的字体。现在我无法理解这一点。

在尝试设置family=""时ggplot2 theme()我似乎无法生成字体更改，因为我使用不同的字体系列编译下面的MWE。

library(ggplot2)library(extrafont)loadfonts(device = "win")a <- ggplot(mtcars, aes(x=wt, y=mpg)) + geom_point() +
        ggtitle("Fuel Efficiency of 32 Cars") +
        xlab("Weight (x1000 lb)") + ylab("Miles per Gallon") +
        theme(text=element_text(size=16, #       family="Comic Sans MS"))#       family="CM Roman"))#       family="TT Times New Roman"))#       family="Sans"))
        family="Serif"))print(a)print("Graph should have refreshed")

R正在返回一个警告font family not found in Windows font database，但有一个我正在关注的教程（如果我能再次找到它，我将在这里更新链接）说这是正常的而不是问题。此外，这在某种程度上起作用，因为我的图表曾经使用过一些arial或helvitica类型的字体。我认为即使在最初的迁移期间，这也始终是一个警告。

UPDATE

当我运行windowsFonts()我的输出是

$ serif [1]“TT Times New Roman”

$ sans [1]“TT Arial”

$ mono [1]“TT Courier New”

但是，这是在我运行之后，我font_import()只能得出结论，我的字体没有保存在正确的位置。运行font_import()请求的代码实际上加载了库：

LocalLibraryLocation <- paste0("C:\\Users\\",Sys.getenv("USERNAME"),"\\Documents","\\R\\win-library\\3.2");
    .libPaths(c(LocalLibraryLocation, .libPaths()))