Alterar fonte no ggplot2 no Windows vs Mac
Eu criei uma trama usando ggplot2 no meu mac. Eu mudei as fontes para Times New Roman, o que funciona bem.
library(extrafont)
ggplot(data=df)+
stat_density(aes(x=R1, colour="rho = -0,6"),
adjust=4, lwd=0.65, geom="line", position="identity")+
stat_density(aes(x=R2, colour="rho = 0,6"),
adjust=4, lwd=0.65, geom="line", position="identity")+
stat_density(aes(x=R3, colour="rho = 0"),
adjust=4, lwd=0.65, linetype=2, geom="line", position="identity")+
xlim(-1, 1)+
xlab("Renditen")+
ylab("Dichte")+
ggtitle("Renditeverteilung im Heston-Modell")+
theme(plot.title=element_text(face="bold", size=16, vjust=2, family="Times New Roman"),
axis.title.x=element_text(vjust=-1, size=14, family="Times New Roman"),
axis.title.y=element_text(vjust=-0.25, size=14, family="Times New Roman"),
legend.text=element_text(size=14, family="Times New Roman"), legend.title=element_blank(),
legend.margin=unit(1, "cm"),
legend.key.height=unit(1, "line"),
legend.key.size=unit(0.8, "cm"),
legend.key=element_rect(fill=NA),
legend.background=element_blank(),
plot.margin=unit(c(1,1,1,1), "cm"))+
scale_colour_manual(values=c("red","black", "blue"), labels=greeks_rho)+
guides(colour=guide_legend(override.aes=list(linetype=c(1,3,1))))
Este é o resultado no Mac:
Eu preciso exportar o gráfico no formato WMF, então usei o R Studio no Windows, onde não posso alterar a fonte para Times New Roman. Eu fiz o seguinte, além do código acima, sem sucesso.
library(extrafont)
font_import()
loadfonts()
Recebo avisos como este (em inglês: ~ "Família de fontes não encontrada no banco de dados de fontes do Windows")
47: In grid.Call.graphics(L_text, as.graphicsAnnot(x$label), ... :
Zeichensatzfamilie in der Windows Zeichensatzdatenbank nicht gefunden
Este é o resultado no Windows:
E: Por que as linhas dos gráficos parecem muito mais suaves no Mac do que no Windows?
Alguém pode ajudar aqui? Obrigado!