r-ggplot中的CM罗马字体

Question

因为我不能在ggplot中使用CM罗马字。

这项工作：

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="Times New Roman"))
print(a)

但这不是

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="CM Roman"))
print(a)

当我运行fonts()时，它告诉我CM Roman是字体之一。

Answer 1

字体可能还没有注册。先运行这个，然后重试：

library(extrafont)
font_install('fontcm')