Dibujar diagrama de dispersión con etiquetas en R

En este artículo, veremos los diferentes enfoques para dibujar diagramas de dispersión con etiquetas en el lenguaje de programación R.

Método 1 : Uso de la función de texto()

En este enfoque de trazar un diagrama de dispersión con etiquetas usando la función text(), el usuario debe llamar a la función text() que se usa para agregar las etiquetas en el gráfico con los parámetros requeridos en el lenguaje de programación R.

Sintaxis: texto (x, y, etiquetas)

Parámetros:
x e y: valores numéricos que especifican las coordenadas del texto a trazar
etiquetas: el texto a escribir

Devoluciones: Texto agregado a la trama

Ejemplo:

gfg_data <- data.frame(x =c(1,2,3,4,5),
                       y = c(5,4,3,2,1),
                       lab=c('g','e','e','k','s'))
gfg_data      
  
plot(gfg_data$x,                                
     gfg_data$y)
  
text(gfg_data$x,                              
     gfg_data$y,
     labels = gfg_data$lab,
     pos = 4)

Producción:

Método 2 : Usar la función geom_text()

En este enfoque para trazar un diagrama de dispersión con etiquetas, el usuario primero debe instalar y cargar el paquete ggplot2 y llamar a la función geom_text() desde el paquete ggplot2 con los parámetros requeridos, esto conducirá al trazado del diagrama de dispersión con etiquetas.

Sintaxis: geom_text(mapping = NULL, data = NULL, stat = “identity”,position = “identity”, parse = FALSE, …)

Parámetros:

• parse:-Si es VERDADERO, las etiquetas se analizarán en expresiones y se mostrarán como se describe en ?plotmath.
• mapeo:-El mapeo estético, generalmente construido con aes o aes_string.
• datos:-Un conjunto de datos específico de la capa: solo es necesario si desea anular los valores predeterminados de la trama.
• stat:-La transformación estadística a usar en los datos para esta capa.
• position:-El ajuste de posición que se usará para puntos superpuestos en esta capa
• …:-other arguments passed on to layer. This can include aesthetics whose values you want to set, not map.

Ejemplo:

gfg_data <- data.frame(x =c(1,2,3,4,5),
                       y = c(5,4,3,2,1),
                       lab=c('g','e','e','k','s'))
gfg_data      
ggplot(gfg_data, aes(x, y, label = lab)) +  geom_point() +
  geom_text(aes(label = lab), hjust = - 0.5)

Producción: