Estudiantes<-c("Nataly","Keyla","Nicolas","Valery")
Edades <-c(18,33,22,20)
df <- data.frame(Estudiantes,Edades)
df
## Estudiantes Edades
## 1 Nataly 18
## 2 Keyla 33
## 3 Nicolas 22
## 4 Valery 20
Promedio_edades <-mean(Edades)
Promedio_edades
## [1] 23.25
summary(Edades)
## Min. 1st Qu. Median Mean 3rd Qu. Max.
## 18.00 19.50 21.00 23.25 24.75 33.00
hist(Edades)