#definimos un vector o extraeremos datos
library(mosaic)Warning: package 'mosaic' was built under R version 4.5.3
edad_media <- mean(~height, data= mosaicData::Galton)
edad_media[1] 66.76069
Aunque pase mucho tiempo sin rasurarse, se parece a Camilo. Cuando se rasura me convierto en asaltacunas pq le sale cara de nené.
Luego sale ganon pq sale más barato la ropa de hombre que de mujer.
#definimos un vector o extraeremos datos
library(mosaic)Warning: package 'mosaic' was built under R version 4.5.3
edad_media <- mean(~height, data= mosaicData::Galton)
edad_media[1] 66.76069
\[ \bar{x}=67 \]