Когда-то я изменил шрифт 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. Я думаю, что это всегда было настоящим предупреждением даже во время первоначальной миграции.
ОБНОВЛЕНИЕ
когда я запускаю 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()))