Reduzca el tamaño del área de la leyenda usando ggplot en R

En este artículo vamos a ver cómo cambiar el tamaño de la leyenda en el gráfico en el lenguaje de programación R. Cambiaremos el tamaño de la leyenda de la trama usando el argumento cex de la función legend().

En este enfoque para cambiar el tamaño de la leyenda del gráfico, el usuario debe usar el argumento cex de la función de leyenda y especificar su valor con el requisito del usuario, los valores de cex mayores que 1 aumentarán el tamaño de la leyenda en el gráfico y el un valor de cex inferior a 1 disminuirá el tamaño de la leyenda en el gráfico.

cex: este es un número que indica la cantidad en la que se debe escalar el texto y los símbolos de trazado en relación con el valor predeterminado. 1 = predeterminado, 1,5 es un 50 % más grande, 0,5 es un 50 % más pequeño, etc.

Ejemplo 1: En este ejemplo, reduciremos el tamaño de la leyenda del gráfico usando el parámetro cex como 0.5 en la función legend() del lenguaje de programación 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))

Producción:

Ejemplo 2: En este ejemplo, disminuiremos el tamaño de la leyenda de la gráfica usando el parámetro cex como 0.5 en la función legend() del lenguaje de programación 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)

Producción:

Publicación traducida automáticamente

Artículo escrito por geetansh044 y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *