EJERCICIO 1

Realice los siguientes cálculos aritméticos

a=(24/-8+7)/(9-6*(2))
a
## [1] -1.333333
b=(2^3)*-7+4-(1/3+1/2)
b
## [1] -52.83333
c=(sqrt(16)+5*4-3^-2)/(3*(4-8)+1)
c
## [1] -2.171717
d=((1/2)*(((5)/(4)-2^-1)*((13)/(4))-sqrt(7)+8/(2-((1/5)))-3^2))
d
## [1] -2.381903
e=2*sin(pi/3)+5*cos(pi/4)-(tan(pi/6)/4)
e
## [1] 5.123247
f=(4*log2(5)-3*log(7,base=3)+((1)/(3))*log(8)^3)
f
## [1] 6.971203

EJERCICIO 2

Los ejercicios de la parte 2.1, redondee los resultados finales

round(a,1)
## [1] -1.3
print(a,1)
## [1] -1
round(b,1)
## [1] -52.8
print(b,1)
## [1] -53
round(c,1)
## [1] -2.2
print(c,1)
## [1] -2
round(d,1)
## [1] -2.4
print(d,1)
## [1] -2
round(f,1)
## [1] 7
print(f,1)
## [1] 7

EJERCIO 3

Una muestra de 20 taxistas que laboran en el centro de la ciudad de Cali en 2016.

  1. Construya dos vectores y denótelos GC y NP para guardar los datos de gasto de combustible y número de pasajeros.
GC = 20 
NP = 20
GC = c(14.2, 8.0, 9.2, 12.1, 8.7, 11.6, 11.0, 12.5, 10.0, 9.0, 8.5, 13.1, 12.9, 8.4, 11.2, 9.8, 12.4, 11.0, 13.0, 8.6)
NP = c(11, 10, 6, 9, 10, 12, 14, 10, 8, 9, 11, 12, 11, 11, 15, 13, 12, 12, 8, 13)
  1. MODA, MEDIANA, MEDIA,DESVIACIÓN ESTANDAR, VARIANZA, CUARTILES DE LOS DATOS GC
modeest::mfv(GC)
## [1] 11
mean(GC)
## [1] 10.76
median(GC)
## [1] 11
var(GC)
## [1] 3.666737
sd(GC)
## [1] 1.914873
quantile(GC)
##     0%    25%    50%    75%   100% 
##  8.000  8.925 11.000 12.425 14.200

MODA, MEDIANA, MEDIA,DESVIACIÓN ESTANDAR, VARIANZA, CUARTILES DE LOS DATOS NP

modeest::mfv(NP)
## [1] 11 12
mean(NP)
## [1] 10.85
median(NP)
## [1] 11
var(NP)
## [1] 4.765789
sd(GC)
## [1] 1.914873
quantile(GC)
##     0%    25%    50%    75%   100% 
##  8.000  8.925 11.000 12.425 14.200
  1. Represente graficamente
plot(GC, col = "green")

plot(NP, col = "purple")

EJERCICIO 4

De acuerdo con DANE durante el año 2016 en la Ciudad de Santiago de Cali - Valle se han presentado diferencias en cuanto al porcentaje de hogares pobres y la tasa de mortalidad infantil

  1. Construya dos vectores y denótelos PHP y TMI para guardar los datos de porcentaje de hogares pobres y tasa de mortalidad infantil.
#Variables
PHP = 6
TMI = 6 
#Vectores 
PHP = c(0.14, 0.247, 0.164, 0.26, 0.257, 0.246)
TMI = c(0.088, 0.102, 0.08, 0.091, 0.082, 0.094)

data = matrix(c(0.14, 0.247, 0.164, 0.26, 0.257, 0.246, 0.088, 0.102, 0.08, 0.091, 0.082, 0.094), nrow = 2, byrow = TRUE)
colnames(data) = c("Central", "Norte", "Sur", "Oriente", "Oeste", "Rural")
rownames(data) = c("PHP", "TMI")
tabla1 = as.table(data)
print(tabla1)
##     Central Norte   Sur Oriente Oeste Rural
## PHP   0.140 0.247 0.164   0.260 0.257 0.246
## TMI   0.088 0.102 0.080   0.091 0.082 0.094
  1. MODA, MEDIANA, MEDIA, DESVIACIÓN ESTANDAR DE LOS DATOS PHP
modeest::mfv(PHP)
## [1] 0.140 0.164 0.246 0.247 0.257 0.260
median(PHP)
## [1] 0.2465
mean(PHP)
## [1] 0.219
sd(PHP)
## [1] 0.05273329

MODA, MEDIANA, MEDIA, DESVIACIÓN ESTANDAR DE LOS DATOS TMI

modeest::mfv(TMI)
## [1] 0.080 0.082 0.088 0.091 0.094 0.102
median(TMI)
## [1] 0.0895
mean(TMI)
## [1] 0.0895
sd(TMI)
## [1] 0.008093207
  1. Represente graficamente
barplot(tabla1, col = "blue", main = "Información del Dane 2016", xlab = "Ubicación", ylab = "Porcentaje de Hogares Pobres")

barplot(tabla1, col = "red", main = "Información del Dane 2016", xlab = "Ubicación", ylab = "Tasa de Mortalidad Infantil")

EJERCICIO 5

Grupo de estudiantes universitarios en cuanto a su género y estado conyugal.

  1. Construya la tabla
data = matrix(c(8, 14, 5, 12, 9, 10), nrow =2, byrow = TRUE)
colnames(data) = c("Casado", "Soltero", "Otro")
rownames(data) = c("Masculino", "Femenino")
tabla2 = as.table(data)
print(tabla2)
##           Casado Soltero Otro
## Masculino      8      14    5
## Femenino      12       9   10
  1. Representa graficamente
Masculino = c(8, 14, 5)
Femenino = c(12, 9, 10)
barplot(tabla2, Masculino, main = "Estado conyugal", xlab = "Estado Civil", ylab = "Masculino",  col = "orange")

barplot(tabla2, Femenino, main = "Estado conyugal", xlab = "Estado Civil", ylab = "Femenino", col = "turquoise")