Modification des polices pour les graphiques en R

Dans mon étude je suis en générant différents graphiques à l'aide de R. je vois que la plupart des graphes de venir avec une Sans Serif type de police avec des tailles différentes.

Comment puis-je changer tout le texte dans un graphique (x-label, y-étiquette, titre, légende, etc.) dans un uniforme de la police par exemple, Times New Roman, 12 pt, Gras?

source d'informationauteur Indian

  1. 23

    Vous pouvez utiliser le extrafont paquet. 

    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

    Modification des polices pour les graphiques en R

    Remarque: à l'Aide de la extrafont package, vous pouvez également intégrer ces polices de caractères dans des fichiers PDF ou EPS (faire des parcelles dans la R et de l'exporter au format PDF/EPS). Vous pouvez également créer directement des symboles mathématiques (voir équation mathématique dans le graphique ci-dessous), généralement créées à l'aide de TeX. Plus d'informations ici et ici. Regardez également la projet github page.

    Modification des polices pour les graphiques en R

    Aussi regarder ce réponse qui décrit la création d' xkcd style des graphiques à l'aide de la extrafont paquet.

    Modification des polices pour les graphiques en R

  2. 6

    Voici un ggplot solution à l'aide de WindowsFonts(...)

    windowsFonts(Times=windowsFont("Times New Roman"))
library(ggplot2)
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", face="bold", size=12)) #Times New Roman, 12pt, Bold

    Modification des polices pour les graphiques en R

    Comme vous pouvez le voir, le texte est vraiment Times New Roman.

    L'idée principale est que, quel que soit le nom que vous donnez à la police en interne dans R, à l'aide de

    windowsFonts(name=windowsFont("system name"))

    vous devez utiliser pour faire référence à la police dans

    theme(text=element_text(family="name",...),...)
  3. 6

    Vous pouvez modifier la police dans Windows en Times New Roman à l'aide de la windowsFonts() de commande et le family option dans plot:

    x = seq(1,10,1)
y = 1.5*x
windowsFonts(A = windowsFont("Times New Roman"))
plot(x, y,
  family="A",
  main = "title",
  font=2)

    Texte en gras vient de font=2. Comme pour la taille, voir ?cex(). Aussi, voir ici: http://www.statmethods.net/advgraphs/parameters.html

    Modification des polices pour les graphiques en R