Las librerías

library (readr)
library (dplyr)
library (knitr)
library (modeest)

Cargar los datos de los casos confirmados en Mexico COVID19

datos <- read.csv("C:/Users/dell/Desktop/Modulo 3 Curso de Titulacion/datos/covid19-mx/casos_confirmados.csv")
kable(head(datos, 10))
X State Sex Age Date Confirmed
0 méxico FEMENINO 75 2020-04-09 1
3 tamaulipas MASCULINO 22 2020-04-06 1
15 distrito federal MASCULINO 40 2020-03-28 1
16 distrito federal FEMENINO 29 2020-04-01 1
17 yucatán MASCULINO 71 2020-04-15 1
22 michoacán FEMENINO 29 2020-04-23 1
27 guerrero FEMENINO 61 2020-04-07 1
28 distrito federal MASCULINO 33 2020-04-08 1
31 méxico FEMENINO 77 2020-04-08 1
32 méxico FEMENINO 84 2020-04-02 1 
kable(tail(datos, 10))
X State Sex Age Date Confirmed
19215 87334 michoacán MASCULINO 22 2020-04-14 1
19216 87344 distrito federal FEMENINO 52 2020-04-26 1
19217 87349 tabasco MASCULINO 36 2020-04-28 1
19218 87353 distrito federal FEMENINO 30 2020-04-21 1
19219 87354 tabasco FEMENINO 47 2020-04-21 1
19220 87356 méxico FEMENINO 28 2020-04-13 1
19221 87358 distrito federal FEMENINO 39 2020-04-28 1
19222 87360 méxico MASCULINO 48 2020-04-22 1
19223 87361 tabasco MASCULINO 48 2020-04-25 1
19224 87365 méxico FEMENINO 62 2020-04-07 1

Estructura de los datos de los casos confirmados en Mexico COVID19

str(datos)
## 'data.frame':    19224 obs. of  6 variables:
##  $ X        : int  0 3 15 16 17 22 27 28 31 32 ...
##  $ State    : chr  "méxico" "tamaulipas" "distrito federal" "distrito federal" ...
##  $ Sex      : chr  "FEMENINO" "MASCULINO" "MASCULINO" "FEMENINO" ...
##  $ Age      : int  75 22 40 29 71 29 61 33 77 84 ...
##  $ Date     : chr  "2020-04-09" "2020-04-06" "2020-03-28" "2020-04-01" ...
##  $ Confirmed: int  1 1 1 1 1 1 1 1 1 1 ...

Resumen de los datos de los casos confirmados en Mexico COVID19

summary(datos)
##        X            State               Sex                 Age        
##  Min.   :    0   Length:19224       Length:19224       Min.   :  0.00  
##  1st Qu.:22523   Class :character   Class :character   1st Qu.: 35.00  
##  Median :44009   Mode  :character   Mode  :character   Median : 46.00  
##  Mean   :44045                                         Mean   : 46.59  
##  3rd Qu.:65793                                         3rd Qu.: 57.00  
##  Max.   :87365                                         Max.   :113.00  
##      Date             Confirmed
##  Length:19224       Min.   :1  
##  Class :character   1st Qu.:1  
##  Mode  :character   Median :1  
##                     Mean   :1  
##                     3rd Qu.:1  
##                     Max.   :1

La media de la variable Age edad de los casos confirmados en Mexico COVID19

media <- mean(datos$Age)
media
## [1] 46.58526

Mediana de la variable Age edad de los casos confirmados en Mexico COVID19

mediana <- median(datos$Age)
mediana
## [1] 46

La moda de la variable Age edad de los casos confirmados en Mexico COVID19

moda <- mlv(datos$Age)
moda
## [1] 46

La varianza de la variable Age edad de los casos confirmados en Mexico COVID19

varianza <- var(datos$Age)
varianza
## [1] 243.3138

La desviacion estandar de la variable Age edad de los casos confirmados en Mexico COVID19

desvstd <- sd(datos$Age)
desvstd
## [1] 15.59852

El Rango de la variable Age edad de los casos confirmados en Mexico COVID19

rango <- range(datos$Age)
rango
## [1]   0 113

Los Cuartiles de la variable Age edad de los casos confirmados en Mexico COVID19 * Valores que estan en une porcentaje de los datos * 25% * 50% * 75%

cuartile50 <- quantile(datos$Age, 0.50)
cuartile50
## 50% 
##  46
cuartile25 <- quantile(datos$Age, 0.25)
cuartile25
## 25% 
##  35
cuartile75 <- quantile(datos$Age, 0.75)
cuartile75
## 75% 
##  57

Graficar boxplot los datos de la variable Age edad de los casos confirmados en Mexico COVID19

boxplot(datos$Age)

edadmenor <- min(datos$Age)
edadmayor <- max(datos$Age)