prueba=c(1,2,3,4,5,6,7)
mean(prueba)
## [1] 4