prueba 1

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

Nombre <- c("paula", "Paula", "Mariana", "MarianaL", "Valeria", "Nicolas", "Jose")

edad

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

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

## [1] 21.42857

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

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

paste("el promedio de la edad es 21.42857")

## [1] "el promedio de la edad es 21.42857"

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

## el promedio de la edad es =  21.42857