¿Cómo cambiar el título de la leyenda en ggplot2 en R?

En este artículo, veremos cómo cambiar el título de la leyenda usando ggplot2 en Programación R. 

Usaremos ScatterPlot. Para los datos del gráfico de dispersión, elegiremos unos 20 valores aleatorios para los ejes X e Y, ambos usando la función rnorm() que puede generar valores normales aleatorios, y aquí tenemos un parámetro más para nombrar la leyenda llamada ‘Usuarios’. Usamos la función sample() para generar datos para el vector de usuarios. La función sample() toma una muestra del tamaño especificado de elementos con o sin reemplazo. Luego cree un DataFrame y asígnelo al objeto de datos ‘datos’.

Ahora crearemos un gráfico usando la función ggplot() y lo haremos disperso usando la función geom_point(). Aquí, para crear un diagrama de dispersión simple, usamos solo el argumento de tamaño de la función geom_point() para establecer el tamaño del punto.

# Load Package
library("ggplot2")
  
# Create DataFrame for plotting
data<-data.frame(x = rnorm(20),
               y = rnorm(20),
               Users = sample(c("User 1", "User 2", "User 3",
                                "User 4", "User 5"),
                              20, replace=TRUE))
  
# Create ScatterPlot using ggplot2 
ggplot(data,aes(x, y, color = Users))+
  geom_point(size = 10)

Producción:

Diagrama de dispersión con leyenda

Método 1: cambie el título de la leyenda usando la función guides().

Ahora, si queremos cambiar el título de la leyenda, debemos agregar guías y funciones de guía_legend a la función geom_point. Dentro de la función de guías(), tomamos el parámetro llamado ‘color’ porque usamos el parámetro de color para la leyenda en la función ggplot(). ‘color’ tiene una llamada a la función de guía guide_legend() como valor. Dentro de la función guide_legend(), tomamos un argumento llamado ‘título’, que tiene el nuevo título de la leyenda como valor.

Sintaxis: guía_leyenda (título)

Parámetro:

• title: una string, que es el nuevo título de ggplot2 Legend. si title tiene valor NULL, no se muestra el título.

Retorno: Guías de leyendas para varias escalas

Aquí el título «Usuarios» se reemplaza con «Usuarios por guías» mediante el uso de la función guías().

# Load Package
library("ggplot2")
  
# Create DataFrame for plotting
data<-data.frame(x = rnorm(20),
               y = rnorm(20),
               Users = sample(c("User 1", "User 2", "User 3",
                                "User 4", "User 5"),
                              20, replace = TRUE))
  
# Create ScatterPlot with Changed Title of 
# Legend using guides() 
ggplot(data,aes(x, y, color = Users))+
  geom_point(size = 10)+
  guides(color = guide_legend(title = "Users By guides"))

Producción:

ScatterPlor con título cambiado de Leyenda usando guías()

Método 2: cambie el título de la leyenda usando la función labs().

En general, la función labs() se usa ampliamente para asignar títulos, subtítulos, leyendas y etiquetas a la trama, pero también puede cambiar el título de otras estéticas. Como aquí, tenemos una función estética extra dentro de ggplot() llamada ‘color’ para la leyenda. Entonces, también podemos cambiar el título de la estética ‘color’ (es decir, Leyenda). Para eso, debemos agregar la función lab a geom_point y asignar el parámetro ‘color’ a su función y darle el nuevo título de ggplot2 plot Legend.

Sintaxis: laboratorios (…)

Parámetro:

• Generalmente labs() tiene muchos parámetros como título, subtítulo, título, etiquetas, etiqueta. Podemos usarlos según nuestros requisitos. aquí usamos solo una estética de la trama como parámetro que cambia el título de la Leyenda de la trama.
• …: Lista de nuevos pares estéticos.

Retorno: etiquetas que son útiles para hacer que la trama sea más comprensible.

Aquí el título «Usuarios» se reemplaza con «Usuarios por laboratorios» mediante el uso de la función labs().

# Load Package
library("ggplot2")
  
# Create DataFrame for plotting
data<-data.frame(x = rnorm(20),
               y = rnorm(20),
               Users = sample(c("User 1", "User 2", "User 3",
                                "User 4", "User 5"),
                              20, replace=TRUE))
  
# Create ScatterPlot with Changed Title
# of Legend using labs() 
ggplot(data,aes(x, y, color = Users))+
  geom_point(size = 10)+
  labs(color = "Users By labs")

Producción:

ScatterPlor con título cambiado de Leyenda usando labs()