Ánalisis de datos diarios covid 19 en el estado de Sonora

library(pacman)
p_load("base64enc", "htmltools", "mime", "xfun", "prettydoc", "readr","knitr", "DT", "tidyverse")

** Se utilizarán datos abiertos del portal de coronavirus del gobierno de mexico encontrable en:

https://coronavirus.gob.mx/datos/#DownZCSVhttps://coronavirus.gob.mx/datos/#DownZCSV

#leer datos del archivo local descargado
datos <- read.csv("Casos_Diarios_Estado_Nacional_Confirmados_20200913 (2).csv")

Transformación de datos para Sonora y sinaloa

#datos absolutos y acumulados para sonora
sonora <- t(datos[datos$nombre == "SONORA" ,])
sonora <- as.vector(sonora)
sonora <- sonora[4:248]
sonora <- as.numeric(sonora)
sonora <- as.vector(sonora)
asonora <- cumsum(sonora)

#datos absolutos y acumulados para Sinaloa
sinaloa <- t(datos[datos$nombre == "SINALOA" ,])
sinaloa <- as.vector(sinaloa)
sinaloa <- sinaloa[4:248]
sinaloa <- as.numeric(sinaloa)
sinaloa <- as.vector(sinaloa)
sinaloa <- cumsum(sinaloa)

# vector fecha

Fecha <- seq(from = as.Date("2020-01-12"), to = as.Date("2020-09-12"), by = "day" )
  • NOTA: en cumsum se acumularon los datos que en un principio eran absolutos.

Tarea

Transformar datos para otros estados: Chihuahua y Chiapas.

#datos absolutos y acumulados para Chihuahua
chihuahua <- t(datos[datos$nombre == "CHIHUAHUA" ,])
chihuahua <- as.vector(chihuahua)
chihuahua <- chihuahua[4:248]
chihuahua <- as.numeric(chihuahua)
chihuahua <- as.vector(chihuahua)
chihuahua <- cumsum(chihuahua)

#datos absolutos y acumulados para Chiapas
chiapas <- t(datos[datos$nombre == "CHIAPAS" ,])
chiapas <- as.vector(chiapas)
chiapas <- chiapas[4:248]
chiapas <- as.numeric(chiapas)
chiapas <- as.vector(chiapas)
chiapas <- cumsum(chiapas)

# vector fecha

Fecha <- seq(from = as.Date("2020-01-12"), to = as.Date("2020-09-12"), by = "day" )

Panorama general de Coronavirus en México

Casos acumulados de coronavirus en México

Como podemos observar , el crecimiento en cuanto los casos de coronavirus en México ha ido incrementado de manera exponencial, por lo que siempre es recomendable seguir las recomendaciones gubernamentales , para evitar la saturación de los servivicios médicos, e de igual forma llevar un plan de alimentación y de ejercicio adecuado para cada persona.

Uso correcto de cubrebocas

En general se espera que se logre entender la problematica actual de la pandemia en el país por coronavirus , a través de la visualización de los datos de los casos confirmados en el país , en especial en los estados de Sonora, Sinaloa, Chihuahua y Chiapas.