Juego

Sacar todos los datos (Media, Varianza, Desviación y Coeficiente de variación)

estaturas1 = c(180,170,172,175,160,155,158,160,172,175)
estaturas1

##  [1] 180 170 172 175 160 155 158 160 172 175

estaturas2 = c(170,172,173,175,178,168,160,169,168,174)
estaturas2

##  [1] 170 172 173 175 178 168 160 169 168 174

Sacar la media de los datos

mediaest1 = mean(estaturas1)
mediaest1

## [1] 167.7

mediaest2 = mean(estaturas2)
mediaest2

## [1] 170.7

VARIANZA Y DESVIACION ESTADAR

varianza_est1 = var(estaturas1)
desv_est1 = sd(estaturas1)
varianza_est1

## [1] 74.9

desv_est1

## [1] 8.654479

varianza_est2 = var(estaturas2)
desv_est2 = sd(estaturas2)
varianza_est2

## [1] 24.67778

desv_est2

## [1] 4.967673

Coeficiente de variacion

CV_estaturas1 <- (desv_est1 / mediaest1)*100
CV_estaturas1

## [1] 5.160691

CV_estaturas2 <- (desv_est2 / mediaest2)*100
CV_estaturas2

## [1] 2.910178

Interpretación

¿Cual conjunto tiene mayor dispersion? El conjunto de estaturas1, pues su desviación es mayor que el conjunto contrario