¿Cómo conectar puntos de datos en Boxplot con líneas en R?

En este artículo, discutiremos cómo conectar puntos emparejados en un diagrama de caja en ggplot2 en el lenguaje de programación R.

Los diagramas de caja con puntos de datos nos ayudan a visualizar la información de resumen entre distribuciones. Por ejemplo, podemos tener dos variables cuantitativas correspondientes a dos categorías diferentes y nos gustaría conectar esos puntos de datos mediante líneas. Entonces, para hacer esto, tenemos que cargar la biblioteca tidyverse

Sintaxis:

library(tidyverse)

Ejemplo 1: crear un diagrama de caja con líneas que unen puntos emparejados

Aquí hay un diagrama de caja básico con líneas que unen puntos emparejados.

# load tidyverse
library(tidyverse)
  
# create dataframe
sample_data < - data.frame(value=c(1, 2, 3, 4, 4, 5, 6,
                                   7, 9, 11, 1.5, 2.3, 2.5, 3.4,
                                   4.5, 5.5, 6.5, 7.5, 9.5, 12.5),
  
                           category=c('A', 'B', 'A', 'B', 'A',
                                      'B', 'A', 'B', 'A', 'B',
                                      'A', 'B', 'A', 'B', 'A',
                                      'B', 'A', 'B', 'A', 'B'),
  
                           paired=c(0, 0, 1, 1, 2, 2, 3, 3, 4, 4,
                                    5, 5, 6, 6, 7, 7, 8, 8, 9, 9))
  
# create plot using ggplot() and geom_boxplot() functions
ggplot(sample_data, aes(category, value, fill=category)) +
geom_boxplot()+
  
# geom_point() is used to make points at data values
geom_point()+
  
# geom_line() joins the paired datapoints
geom_line(aes(group=paired))

Producción:

Personalización de colores:

Podemos cambiar el color y el ancho del segmento de unión usando la propiedad de color y tamaño de geom_line().  

Sintaxis:

ggplot(aes(x, y)) + geom_boxplot()+geom_point(aes(relleno), tamaño, forma) + geom_line(aes(grupo), tamaño, color, alfa)

Parámetros :

• grupo: la variable que tiene pares a unir.
• color: la variable que categoriza los puntos
• alfa: determina la transparencia
• tamaño: determina el tamaño
• forma: determina la forma
• relleno: determina el color de relleno

Ejemplo:

# load tidyverse
library(tidyverse)
  
# create dataframe
sample_data <- data.frame( value = c(1,2,3,4,4,5,6,
                                     7,9,11,1.5,2.3,2.5,3.4,
                                     4.5,5.5,6.5,7.5,9.5,12.5),
                            
                          category = c('A','B','A','B','A',
                                        'B','A','B','A','B',
                                        'A','B','A','B','A',
                                        'B','A','B','A','B'),
                            
                          paired = c(0,0,1,1,2,2,3,3,4,4,
                                     5,5,6,6,7,7,8,8,9,9))
  
  
# create plot using ggplot() and geom_boxplot() functions
ggplot(sample_data, aes(category,value, fill=category)) +
  geom_boxplot()+
  
  # geom_line() joins the paired datapoints
  # color and size parameters are used to customize line
  geom_line(aes(group = paired), size=2, color='gray', alpha=0.6)+
   
  # geom_point() is used to make points at data values
  # fill and size parameters are used to customize point
  geom_point(aes(fill=category,group=paired),size=5,shape=21)

Producción:

Personalización de línea

Podemos convertir la línea de unión en una línea con surcos usando la propiedad de tipo de línea. Cada propiedad que funciona en un gráfico de líneas también funciona en esta línea.

Sintaxis:

ggplot(aes( x, y )) + geom_boxplot()+geom_point() + geom_line( aes( grupo ), tipo de línea )

Parámetros

• grupo: la variable que tiene pares a unir.
• linetype: determina el tipo de línea

Ejemplo:

# load tidyverse
library(tidyverse)
  
# create dataframe
sample_data <- data.frame( value = c(1,2,3,4,4,5,6,
                                     7,9,11,1.5,2.3,2.5,3.4,
                                     4.5,5.5,6.5,7.5,9.5,12.5),
                            
                          category = c('A','B','A','B','A',
                                        'B','A','B','A','B',
                                        'A','B','A','B','A',
                                        'B','A','B','A','B'),
                            
                          paired = c(0,0,1,1,2,2,3,3,4,4,
                                     5,5,6,6,7,7,8,8,9,9))
  
  
# create plot using ggplot() and geom_boxplot() function
ggplot(sample_data, aes(category,value, fill=category)) +
  geom_boxplot()+
  
# linetype parameter is used to customize the joining line
  geom_line(aes(group = paired), linetype=2, size=1.3)+
  
# geom_point() is used to plot data points on boxplot
geom_point(aes(fill=category,group=paired),size=5,shape=21)

Producción: