Ejercicios

1. Extraccion de Valores de un vector

x=c(1,10,3,20,14) ##c es para crear un vector
x

## [1]  1 10  3 20 14

x[5]              ## corchetes sirve par extraer valores

## [1] 14

x[c(2,4)]

## [1] 10 20

2. Calculo de promedio con NA

pagos=c(200,300,150,NA)
pagos

## [1] 200 300 150  NA

mean(pagos) ##mean realiza el promedio

## [1] NA

mean(pagos, na.rm=TRUE)  ##no considera los NA

## [1] 216.6667

3. Graficas

ejex=c(1,2,3,4,5,6,7,8,9,10)
ejey=c(1,2,3,4,5,6,7,8,9,10)
plot(ejex,ejey)  #funcion para graficar

4. Histograma

f=c(10,30,30,40,50,60,80,100)
hist(f)  ##funcion para realizar histograma

5. Grafica de barras

impuestos=c(196,178,116)
names(impuestos)=c("ventas","inmuebles","renta")
barplot(impuestos)

6. Grafica Dotchart

dotchart(impuestos,xlab="impuestos en millones",main="Impuestos segun Procedencia",pch="@")

7.Suma y promedio

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/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)
mean(Examen2b)

## [1] 79.1

8. resultados estadisticos

Estatura=c(66,67,58,73,69,67,71)
mean(Estatura)

## [1] 67.28571

median(Estatura)

## [1] 67

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(Peso)

## [1] 179

var(Peso)

## [1] 616.8095

min(Peso)

## [1] 130

max(Peso)

## [1] 200

9.Correlacion

Precio=c(10,9,8,7,6,5)
Unidades=c(5,9,13,17,21,25)
cor(Precio,Unidades) ## si es 1 estan directamente correlacionados, si es ) no tienen correlacion y si es -1, esta inversamente correlacionados.

## [1] -1

plot(Unidades,Precio)

10. graficos de Barras

frutveg=c(100,680,789,150)
names(frutveg)=c("Yautia","Guineos","Platanos maduros","Platanos Verdes")
barplot(frutveg)