prueba 2

edad <- c(20,22,23,21,20,22,21) # edades de 7 estudiantes

nombre <- c("Ana Maria", "Paula", "Mariana", "Valeria", "Nicolas", "Jose")

edad

## [1] 20 22 23 21 20 22 21

promedio_edad <- sum(edad)/length(edad); promedio_edad

## [1] 21.28571

print("el promedio de la edad es = 21")

## [1] "el promedio de la edad es = 21"

paste(promedio_edad)

## [1] "21.2857142857143"

cat("el promedio de la edad es= ", promedio_edad)

## el promedio de la edad es=  21.28571