El ejercicio nos muestra los puntajes de dos muestras independientes de estudiantes en la prueba de inglés SAT, un grupo donde los padres de los estudiantes tienen licenciatura y el otro grupo donde los padres de los estudiantes solo estudiaron hasta la preparatorio. Los grupos de datos son los siguientes:
# Definimos los vectores:
licenciatura <- c(410, 448, 469, 485, 487, 497, 515, 526, 533, 534, 550, 554, 572, 578, 592, 650)
preparatoria <- c(390, 425, 442, 478, 479, 485, 486, 492, 524, 528, 535, 580)
# Creamos la tabla
tabla <- data.frame("Con licenciatura" = licenciatura)
tabla2 <- data.frame("Con preparatoria" = preparatoria)
print(tabla)
## Con.licenciatura
## 1 410
## 2 448
## 3 469
## 4 485
## 5 487
## 6 497
## 7 515
## 8 526
## 9 533
## 10 534
## 11 550
## 12 554
## 13 572
## 14 578
## 15 592
## 16 650
print(tabla2)
## Con.preparatoria
## 1 390
## 2 425
## 3 442
## 4 478
## 5 479
## 6 485
## 7 486
## 8 492
## 9 524
## 10 528
## 11 535
## 12 580
Primero obtenemos el resumen descriptivo de cada una de nuestras tablas:
summary(tabla)
## Con.licenciatura
## Min. :410.0
## 1st Qu.:486.5
## Median :529.5
## Mean :525.0
## 3rd Qu.:558.5
## Max. :650.0
summary(tabla2)
## Con.preparatoria
## Min. :390.0
## 1st Qu.:469.0
## Median :485.5
## Mean :487.0
## 3rd Qu.:525.0
## Max. :580.0
Ahora podemos compara los datos de amas tablas usando un Boxplot:
Note that the echo = FALSE parameter was added to the
code chunk to prevent printing of the R code that generated the
plot.