ejercicio

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

## [1] 88

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,92.4,45.2,85.4,89.6,72.5,88.7)
examen2b

##  [1]  90.2  76.9  50.1 100.0  92.4  45.2  85.4  89.6  72.5  88.7

mean(examen2b)

## [1] 79.1

edad

## [1] 88

estatura=c(66,67,58,73,69,67,71)

mean(estatura)

## [1] 67.28571

var(estatura)

## [1] 22.90476

min(estatura)

## [1] 58

max(estatura)

## [1] 73

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

## [1] 169.1429

median(estatura)

## [1] 67

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

frutyveg=c(100,680,789,150)

names(frutyveg)=c("yautia","Guineos","platanos maduros","platanos verdes")

barplot(frutyveg)