Este código de R corresponde a la figura 6.10 del libro Análisis de datos con el programa estadístico R: una introducción aplicada de Salas-Eljatib (2021).

Última actualización de esta web: 13 noviembre, 2022

Cargando los datos de ejemplo

Ocuparemos la dataframe fishgrowth del paquete datana de Salas-Eljatib, Riquelme, and Pino (2021).

> library(datana)
> data(fishgrowth)
> df <- fishgrowth
> head(df) #primeras seis filas
  age length  scale
1   1     71 1.9061
2   1     64 1.8771
3   1     57 1.0974
4   1     68 1.3311
5   1     72 1.5928
6   1     80 1.9160
> nrow(df) #numero de filas de la dataframe
[1] 439

Estos datos contienen variables biometricas para individuos del pez Micropterus dolomieu en el lago West Bearskin del estado de Minnesota (USA). Estos datos provienen del paquete alr4 Weisberg (2014) del libro de Weisberg (2013).

El gráfico

Para realizar este gráfico basta símplemente con utilizar la función xyBoxplot del paquete datana de Salas-Eljatib (2021).

> xyBoxplot(x=df$length,y=df$scale) #aplicando la funcion con opciones por defecto
Warning: Use of `df$x.class` is discouraged. Use `x.class` instead.
Use of `df$x.class` is discouraged. Use `x.class` instead.

> xyBoxplot(x=df$length,y=df$scale, xlab="Variable x",
+        col.dots = "red")#color de los puntos
Warning: Use of `df$x.class` is discouraged. Use `x.class` instead.
Use of `df$x.class` is discouraged. Use `x.class` instead.

El gráfico del libro

> xyBoxplot(x=df$length,y=df$scale, ylab="Radio (mm)",
+        xlab="Largo (mm)")
Warning: Use of `df$x.class` is discouraged. Use `x.class` instead.
Use of `df$x.class` is discouraged. Use `x.class` instead.