Cómo mover una leyenda ggplot2 con varias filas al final de un gráfico en R

En este artículo, vamos a ver cómo dibujar la leyenda ggplot2 en la parte inferior y con dos filas en el lenguaje de programación R. Primero, tenemos que crear un diagrama de datos simple con leyenda. Aquí dibujaremos un diagrama de dispersión simple.

Cargando biblioteca

Primero, cargue el paquete ggplot2 usando la función library() .

 library("ggplot2")

Cree un DataFrame por ejemplo. Aquí creamos un Marco de datos simple con tres variables llamadas Año , Puntos y Usuarios y luego lo asignamos al objeto de datos.

library("ggplot2")
  
# Create a DataFrame
data <- data.frame(Year = c(2011, 2012, 2013, 2014, 2015),
                   Points = c(30, 20, 15, 35, 50),
                   Users = c("user1", "user2", "user3",
                             "user4", "user5"))
print(data)

Producción:

marco de datos

Para crear un diagrama R, usamos la función ggplot() y para hacer un diagrama de dispersión, agregamos la función geom_point() a la función ggplot(). asigne todo este gráfico al objeto de datos gplot .

Código:

# Load Package
library("ggplot2")
  
# Create a DataFrame 
data <- data.frame(Year = c(2011, 2012, 2013, 2014, 2015),
                   Points = c(30, 20, 15, 35, 50),
                   Users = c("user1", "user2", "user3", 
                             "user4", "user5"))
  
# Create a Scatter Plot and assign it 
# to gplot data object
gplot <- ggplot(data, aes(Year, Points, color = Users)) +   
  geom_point(size = 7)
gplot

Producción:

Diagrama de dispersión simple con leyenda

Dibuja la leyenda ggplot2 en la parte inferior de la trama

Para dibujar la leyenda ggplot2 en la parte inferior de la gráfica, simplemente agregamos la función theme() a la función geom_point().

Sintaxis: tema (leyenda.posición)

Parámetro: en general, la función theme() tiene muchos parámetros para especificar el tema de la trama, pero aquí usamos solo el parámetro legend.position que especifica la posición de Legend.

Retorno : Tema de la trama.

Podemos especificar el valor del parámetro legend.position de izquierda , derecha , arriba y abajo . Para dibujar la leyenda en la parte inferior del gráfico, usamos ‘inferior’ como valor del parámetro legend.position.

# Load Package
library(ggplot2)
  
# Create a DataFrame For plot
data <- data.frame(Year = c(2011, 2012, 2013, 2014, 2015),
                   Points = c(30, 20, 15, 35, 50),
                   Users = c("user1", "user2", "user3", 
                             "user4", "user5"))
  
# Create a simple scatter plot 
# with legend at bottom.
ggplot(data, aes(Year, Points, color = Users)) +   
  geom_point(size = 7)+
  theme(legend.position = "bottom")

Producción:

Gráfico de dispersión con leyenda en la parte inferior

Dibuja la leyenda ggplot2 en la parte inferior con dos filas

Si queremos dibujar la Leyenda ggplot2 en la parte inferior de la gráfica con dos filas, tenemos que agregar guías y funciones guide_legend a la función theme(). Dentro de la función guides(), tomamos el parámetro llamado color , que tiene como valor una llamada a la función de guía guide_legend(). Dentro de la función guide_legend(), tomamos un argumento llamado nrow , que tiene como valor el número deseado de filas de leyenda.

Sintaxis: guía_leyenda (nrow)

Parámetro: 

• nrow : el número deseado de filas de la leyenda.

Retorno: Guías de leyendas para varias escalas

Código:

# Load Package
library(ggplot2)
  
# Create a DataFrame For plot
data <- data.frame(Year = c(2011, 2012, 2013, 2014, 2015),
                   Points = c(30, 20, 15, 35, 50),
                   Users = c("user1", "user2", "user3",
                             "user4", "user5"))
  
# Create a simple scatter plot with
# legend at bottom and with Two Rows.
# Specifies the Number of legend Rows
ggplot(data, aes(Year, Points, color = Users)) +   
  geom_point(size = 7)+
  theme(legend.position = "bottom")+
  guides(color = guide_legend(nrow = 2))      

Producción:

Diagrama de dispersión con leyenda en la parte inferior con dos filas