Réduire la taille de la zone de légende à l’aide de ggplot dans R

Afficher la discussion

Améliorer l’article

Enregistrer l’article

J’aime l’article

Afficher la discussion

Améliorer l’article

Enregistrer l’article

J’aime l’article

Dans cet article, nous allons voir comment modifier la taille de la légende dans le tracé dans le langage de programmation R. Nous allons changer la taille de la légende du tracé en utilisant l’argument cex de la fonction legend().

Dans cette approche pour modifier la taille de la légende du tracé, l’utilisateur doit utiliser l’argument cex de la fonction de légende et spécifier sa valeur avec l’exigence de l’utilisateur, les valeurs de cex supérieures à 1 augmenteront la taille de la légende dans le tracé et la une valeur de cex inférieure à 1 diminuera la taille de la légende dans le tracé.

cex : Il s’agit d’un nombre indiquant la quantité de mise à l’échelle du texte et des symboles de traçage par rapport à la valeur par défaut. 1=par défaut, 1,5 est 50 % plus grand, 0,5 est 50 % plus petit, etc.

Exemple 1: Dans cet exemple, nous allons diminuer la taille de la légende du tracé en utilisant le paramètre cex à 0,5 dans la fonction legend() du langage de programmation R.

R

x1 <- c(1, 8, 5, 3, 8, 7)                

y1 <- c(4, 6, 3, 8, 2, 7)

 

plot(x1, y1, cex = .8, pch = 1,

     col = "red")

 

x2<-c(4, 5, 8, 6, 4)

y2<-c(9, 8, 2, 3, 1)

x3<-c(2, 1, 6, 7, 4)

y3<-c(7, 9, 1, 5, 2)

 

points(x2, y2, cex = .8, pch = 2, col = "blue")

points(x3, y3, cex = .8, pch = 3, col = "green")

 

legend("topright", c("gfg1", "gfg2", "gfg3"),

       cex = 0.5, col = c("red", "blue", "green"),

       pch = c(1, 2, 3))

Production:

444

Exemple 2 : Dans cet exemple, nous allons diminuer la taille de la légende du tracé en utilisant le paramètre cex à 0,5 dans la fonction legend() du langage de programmation R.

R

gfg_data <- matrix(c(1, 2, 3, 4, 5, 6, 7, 8, 9, 10), 

                   ncol = 5)    

colnames(gfg_data) <- paste0("Gfg", 1:5)

rownames(gfg_data) <- c('A','B')

 

gfg_data

 

barplot(gfg_data,

        col = 1 : nrow(gfg_data))

 

legend("topright",

       legend = rownames(gfg_data),

       pch = 15,

       col = 1 : nrow(gfg_data), cex = 0.5)

Production:

444

Laisser un commentaire

Votre adresse e-mail ne sera pas publiée. Les champs obligatoires sont indiqués avec *