Dibuja la composición de las parcelas usando el paquete patchwork en R

En este artículo, discutiremos cómo dibujar una composición de gráficos utilizando el paquete patchwork en el lenguaje de programación R. El paquete patchwork facilita el trazado de diferentes ggplots en un solo gráfico. Necesitaremos ambos paquetes ggplot2 para graficar nuestros datos y el paquete patchwork para combinar los diferentes ggplots. 

Primero dibujemos todas las parcelas normalmente e independientemente.

Ejemplo: Trazar el conjunto de datos en un gráfico de barras

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
# Plotting the bar chart
gfg1 <- ggplot(iris, aes(Sepal.Length, Petal.Length, color = Species)) + 
geom_bar(stat = "identity")
  
gfg1

Producción :

Parcela de barras

Ejemplo: Trazar el conjunto de datos en un diagrama de dispersión

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
# Scatterplot
gfg2 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) + geom_point()
  
gfg2

Producción :

Gráfico de dispersión

Ejemplo: Trazar el conjunto de datos en un diagrama de líneas

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
# Line plot
gfg3 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) + geom_line()
  
gfg3

Producción :

Trazado de líneas

Ahora veamos cómo se pueden combinar estas tres parcelas en varias orientaciones.

Trazar verticalmente

La orientación vertical combina las parcelas y estas parcelas se colocan una al lado de la otra. Tomaremos los diagramas ggplot2 anteriores y los agregaremos para organizarlos verticalmente. El operador + se utiliza para organizar estos gráficos uno al lado del otro en el mismo gráfico.

Ejemplo: Organizar parcelas verticalmente en el mismo marco

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
gfg1 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) + geom_bar(stat = "identity")
  
gfg2 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) + geom_point()
  
gfg3 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) + geom_line()
  
# Combination of plots by arranging them side by side
gfg_comb_1 <- gfg1 + gfg2 + gfg3
  
gfg_comb_1

Producción :

Orientación vertical

Organizar con diferentes anchos 

La segunda combinación de estos gráficos sería organizarlos en diferentes anchos en múltiples filas y columnas en la misma ventana de gráficos. La diferente orientación del ancho organiza las parcelas en diferentes líneas según el ancho. Básicamente, la primera parcela se coloca en la primera línea y las otras dos parcelas se colocan en la siguiente línea horizontalmente.

Usamos un operador de barra inclinada (/) en esa posición donde queremos comenzar una nueva línea. Así que lo colocamos después de la primera parcela. Luego, usamos el operador de suma (+) para organizar las otras dos gráficas horizontalmente en la próxima línea nueva.

Ejemplo: Disposición de parcelas con diferentes anchos

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
gfg1 <- ggplot(iris, aes(Sepal.Length, Petal.Length,
                         color = Species)) + 
geom_bar(stat = "identity")
  
gfg2 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) +
geom_point()
  
gfg3 <- ggplot(iris, aes(Sepal.Length, Petal.Length, 
                         color = Species)) +
geom_line()
  
# Arranging the plots in different widths
gfg_comb_2 <- gfg1 / (gfg2 + gfg3)
  
gfg_comb_2

Producción :

Orientación de diferentes anchos

Organizar con diferentes alturas 

La tercera combinación de estos gráficos sería organizarlos en diferentes alturas en varias filas y columnas en la misma ventana de gráficos. La diferente orientación de altura organiza las parcelas en diferentes líneas según las alturas. Básicamente, las dos primeras parcelas están dispuestas horizontalmente y la última parcela aquí se coloca debajo de la segunda parcela.

Usamos el operador de suma (+) para organizar las dos primeras gráficas horizontalmente. Luego usamos el operador de barra inclinada (/) para colocar el tercer gráfico en una nueva línea debajo del segundo gráfico.

Ejemplo: Disposición de parcelas con diferentes alturas

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
gfg1 <- ggplot(iris, aes(Sepal.Length, Petal.Length,
                         color = Species)) + 
geom_bar(stat = "identity")
  
gfg2 <- ggplot(iris, aes(Sepal.Length, Petal.Length,
                         color = Species)) +
geom_point()
  
gfg3 <- ggplot(iris, aes(Sepal.Length, Petal.Length,
                         color = Species)) + 
geom_line()
  
# Arrangement of plots according to 
# different heights
gfg_comb_3 <- gfg1 + gfg2 / gfg3
  
gfg_comb_3

Producción :

Orientación a diferentes alturas

Trazar horizontalmente

La última combinación de parcelas es organizarlas horizontalmente. Estas parcelas se colocan una debajo de la otra. Usaremos el operador de barra inclinada ( / ) para colocar estos gráficos en una nueva línea, uno debajo del otro gráfico.

Ejemplo: Disposición de parcelas verticalmente

library(ggplot2)
library(patchwork)
  
data(iris)
  
head(iris)
  
gfg1 <- ggplot(iris, aes(Sepal.Length, Petal.Length, color = Species)) + 
geom_bar(stat = "identity")
  
gfg2 <- ggplot(iris, aes(Sepal.Length, Petal.Length, color = Species)) + 
geom_point()
  
gfg3 <- ggplot(iris, aes(Sepal.Length, Petal.Length, color = Species)) + 
geom_line()
  
# Combination of plots by arranging them 
# horizontally
gfg_comb_4 <- gfg1 / gfg2 / gfg3
  
gfg_comb_4

Producción :

Orientación horizontal