Fonction R du Jour
par(mar =c(5.1, 4.1, 4.1, 2.1), mgp=c(3, 1, 0), las= 0)
par définit ou ajuste les paramètres de tracé. Nous considérons ici les trois paramètres suivants: taille de la marge (mar), emplacements des étiquettes d’axe (mgp) et orientation des étiquettes d’axe (las).
- mar – Un vecteur numérique de longueur 4, qui définit les tailles de marge dans l’ordre suivant: bas, gauche, haut et droite. La valeur par défaut est c(5.1, 4.1, 4.1, 2.1).
- mgp – Un vecteur numérique de longueur 3, qui définit les emplacements des étiquettes d’axe par rapport au bord de la fenêtre de tracé interne. La première valeur représente l’emplacement des étiquettes (c’est-à-dire xlab et ylab dans le tracé), la seconde les étiquettes à graduations et la troisième les graduations. La valeur par défaut est c(3, 1, 0).
- las – Une valeur numérique indiquant l’orientation des étiquettes des repères et de tout autre texte ajouté à un tracé après son initialisation. Les options sont les suivantes: toujours parallèle à l’axe (par défaut, 0), toujours horizontal (1), toujours perpendiculaire à l’axe (2) et toujours vertical (3).Exemple
. Les valeurs par défaut des trois paramètres de traçage sont affichées à l’aide de chaînes de caractères de leurs noms d’arguments dans par (voir par (char)), suivies d’un exemple de code créant quatre tracés, où un paramètre de traçage supplémentaire est modifié dans chaque tracé. En plus des parcelles individuelles indiquées ci-dessous, un PDF de 4 pages des parcelles est disponible pour une navigation plus facile.
> par ("mar") 5,1 4,1 4,1 2.1 > par ("mgp") 3 1 0 > par ("las") 0 > > set.graine (5) > x < - rnorm(200) > y <- 25 - 22* x +5 * x^2 + rnorm(200) > > png("par-120208-01.png") > plot(x, y, main="defaults") > dev.off() quartz 2 > > png("par-120208-02.png") > par(mar=c(3.5, 3.5, 2, 1))> plot(x, y, main ="par(mar=c(3.5, 3.5, 2, 1))")> dev.off() quartz 2 > > png("par-120208-03.png") > par(mar=c(3.5, 3.5, 2, 1), mgp = c(2.4, 0.8, 0))> plot(x, y, main ="par(mar=c(3.5, 3.5, 2, 1), mgp = c(2.4, 0.8, 0))")> dev.off() quartz 2 > > png("par-120208-04.png") > par(mar=c(3.5, 3.5, 2, 1), il y a une différence entre le nombre de points et le nombre de points.(3.5, 3.5, 2, 1), mgp= c(2,4, 0,8, 0), las = 1)") > dev.off()quartz 2
Les données sont reproductibles grâce à l’ensemble.la fonction seed et les tracés ont été enregistrés dans des fichiers à l’aide de la fonction png.
