ejercico

edad = +9+10+9+8+8+10+9+8+9
edad

## [1] 80

edad2 = c(8,9,10,9,8,8,10,9,8,9)
sum(edad2)

## [1] 88

examen2a = 90.2+76.9+50.1+100+92.4+45.2+85.4+89.6+72.5+88.7
examen2a

## [1] 791

examen2a/10

## [1] 79.1

examen2b =c(90.2,76.9,50.1,100.924,45.2,85.4,89.6,72.5,88.7)
examen2b

## [1]  90.200  76.900  50.100 100.924  45.200  85.400  89.600  72.500  88.700

mean(examen2b)

## [1] 77.72489

ejercicio 2

estatura=c (66,67,58,7369,67,71)
mean(estatura)

## [1] 1283

var(estatura)

## [1] 8889473

min(estatura)

## [1] 58

max(estatura)

## [1] 7369

peso=c(140,180,130,200,175,180,179)
median(peso)

## [1] 179

median(peso)

## [1] 179

var(peso)

## [1] 616.8095

min(peso)

## [1] 130

max(peso)

## [1] 200

precio = c(10,9,8,7,6,5)
unidades=c(5,9,13,17,21,25)
cor(precio,unidades)

## [1] -1

plot(unidades)

frutyveg=c(100,680,789,150)
names(frutyveg)=c("yautia","guineos","platanos maduros","platanos verdes")
barplot(frutyveg)