title: “Visualización de Datos” output: html_document date: “2026-04-30” —

Cuartetos de Anscombe

Ejemplo de ggplot en clase de visualización de datos BI MAIN-Univalle

# 1. Cargar datos
# Asegúrate de que la ruta sea correcta en tu computador
datos <- read.csv2("~/Maestria/1. Inteligencia de Negocio/visualizacion/anscombe (1).csv")

# Resumen de los datos
summary(datos)

##       Set             X            Y         
##  Min.   :1.00   Min.   : 4   Min.   : 3.100  
##  1st Qu.:1.75   1st Qu.: 7   1st Qu.: 6.117  
##  Median :2.50   Median : 8   Median : 7.520  
##  Mean   :2.50   Mean   : 9   Mean   : 7.501  
##  3rd Qu.:3.25   3rd Qu.:11   3rd Qu.: 8.748  
##  Max.   :4.00   Max.   :19   Max.   :12.740

Visualización de los datos con ggplot2

En esta sección creamos el lienzo y añadimos las capas de puntos, facetas y líneas de tendencia.

# 1. Creamos el lienzo y determinamos la información de los ejes

lienzo <- ggplot(datos, aes(x = X, y = Y, color = as.factor(Set))) 

# 2. Agregamos las capas: puntos, división por sets y regresión lineal
lienzo <- lienzo + geom_point() 

#2.1. dividimos por set de datos el lienzo
lienzo <- lienzo + facet_wrap(~Set) + geom_smooth(method = "lm", se = FALSE)

# 3. Agregamos etiquetas
lienzo <- lienzo + labs(
  title = "Cuartetos de Anscombe",
  subtitle = "Visualización gráfica",
  x = "Variable X",
  y = "Variable Y",
  color = "Set"
)

# 4. Mostrar el gráfico final
lienzo

## `geom_smooth()` using formula = 'y ~ x'

``````

Note that the echo = FALSE parameter was added to the code chunk to prevent printing of the R code that generated the plot.