Commit 6ed45569 authored by numeroteca's avatar numeroteca

update Spain data-charts 2021-02-22 II

parent cc2d010b
......@@ -13,7 +13,7 @@ caption_en <- "By: lab.montera34.com/covid19 | Data: EsCOVID19data. Check code.m
caption_provincia <- "Gráfico: @numeroteca (lab.montera34.com/covid19) | Datos: esCOVID19data (github.com/montera34/escovid19data)"
updated <- ""
# period <- "Para CCAA uniprov. casos es la suma de PCR+ y TestAc+ desde 2020.04.15"
today <- Sys.Date()
today <- Sys.Date() -1
period <- paste0("(Actualizado: ",today,")")
# filter_date <- as.Date("2021-02-18")
filter_date <- today + 1
......
......@@ -1021,7 +1021,7 @@ write.csv( coruna, file = "data/output/spain/galicia/coruna_area.csv", row.names
# // Une las areas de A Coruña --------
coruna_prov <- rbind(
santiago %>% select(names(data_cases_sp_provinces)),
santiago %>% select(names(data_cases_sp_provinces)) %>% mutate( deceased = as.numeric( as.character(deceased) ) ),
ferrol %>% select(names(data_cases_sp_provinces)),
coruna %>% select(names(data_cases_sp_provinces))
) %>% group_by(date) %>% summarise (
......@@ -2024,12 +2024,12 @@ data_cases_sp_provinces <- rbind(data_cases_sp_provinces,
#TODO: volver a activar cuando arreglen als fechas, mietnras trabajar con los CSV del .zip
# download.file("https://opendata.euskadi.eus/contenidos/ds_informes_estudios/covid_19_2020/opendata/datos-asistenciales.zip",
# "data/original/spain/euskadi/datos-asistenciales.zip")
unzip(zipfile = "data/original/spain/euskadi/datos-asistenciales.zip", exdir = "data/original/spain/euskadi/")
# unzip(zipfile = "data/original/spain/euskadi/datos-asistenciales.zip", exdir = "data/original/spain/euskadi/")
# descarga, aunque no usa en este script, los datos de situación epidemiológica en Euskadi. Descomprime el zip
# download.file("https://opendata.euskadi.eus/contenidos/ds_informes_estudios/covid_19_2020/opendata/situacion-epidemiologica.zip",
# "data/original/spain/euskadi/situacion-epidemiologica.zip")
# unzip(zipfile = "data/original/spain/euskadi/situacion-epidemiologica.zip", exdir = "data/original/spain/euskadi/situacion-epidemiologica_csv/")
download.file("https://opendata.euskadi.eus/contenidos/ds_informes_estudios/covid_19_2020/opendata/situacion-epidemiologica.zip",
"data/original/spain/euskadi/situacion-epidemiologica.zip")
unzip(zipfile = "data/original/spain/euskadi/situacion-epidemiologica.zip", exdir = "data/original/spain/euskadi/situacion-epidemiologica_csv/")
euskadi_original <- read_excel("data/original/spain/euskadi/datos-asistenciales.xlsx", skip = 2, col_names = TRUE, sheet = "01")
......@@ -3069,8 +3069,8 @@ spain_ccaa <- merge(
# ) %>% select (-ccaa_ren, -date_new, -date_ren, -dunique)
# Add Euskadi data ------
# download.file("https://opendata.euskadi.eus/contenidos/ds_informes_estudios/covid_19_2020/opendata/situacion-epidemiologica.xlsx",
# "data/original/spain/euskadi/situacion-epidemiologica.xlsx")
download.file("https://opendata.euskadi.eus/contenidos/ds_informes_estudios/covid_19_2020/opendata/situacion-epidemiologica.xlsx",
"data/original/spain/euskadi/situacion-epidemiologica.xlsx")
muertes_eus <- read_excel("data/original/spain/euskadi/situacion-epidemiologica.xlsx", skip = 2, col_names = TRUE, sheet = "08") %>% rename(
# muertes_eus <- read_excel("tmp/euskadi/situacion-epidemiologica_muertos.xlsx", skip = 2, col_names = TRUE, sheet = "08") %>% rename(
date = "Data / Fecha",
......
......@@ -1038,3 +1038,6 @@ date,province,ccaa,new_cases,PCR,TestAc,activos,hospitalized_accumulated,intensi
2021-02-21,Zaragoza,Aragón,207,NA,NA,5459,NA,957,2383,76570,NA,68728,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,50,964693
2021-02-21,Huesca,Aragón,23,NA,NA,630,1429,149,454,15888,NA,14804,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,22,220461
2021-02-21,Teruel,Aragón,32,NA,NA,1429,1230,98,396,12955,NA,11130,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,44,134137
2021-02-22,Zaragoza,Aragón,115,NA,NA,4974,8067,702,2394,76685,NA,69317,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,50,964693
2021-02-22,Huesca,Aragón,37,NA,NA,593,1426,149,456,15925,NA,14876,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,22,220461
2021-02-22,Teruel,Aragón,29,NA,NA,1318,1235,98,399,12984,NA,11267,Gobierno de Aragón;aragon.es,https://datacovid.salud.aragon.es/covid/,44,134137
......@@ -6690,3 +6690,26 @@
2021-02-22;"C.S. Fraga - Bajo Cinca";1;0;"Fraga";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210221-Capacidad-Asistencial.html"
2021-02-22;"Hospital de Jaca";0;0;"Jaca";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210221-Capacidad-Asistencial.html"
2021-02-22;"H. Hernán Cortés";3;1;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210221-Capacidad-Asistencial.html"
2021-02-23;"Hospital Universitario Miguel Servet";111;32;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Clínico Universitario";122;21;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Royo Villanova";62;10;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Nuestra Señora de Gracia";14;4;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital General de la Defensa";7;0;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Obispo Polanco";34;3;"Teruel";"Teruel";44216;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital de Alcañiz";13;0;"Alcañiz";"Teruel";44216;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital de Barbastro";17;2;"Barbastro";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital San Jorge";19;2;"Huesca";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Sagrado Corazón";0;0;"Huesca";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Ernest Lluch";21;0;"Calatayud";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital San José";6;0;"Teruel";"Teruel";44216;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Ejea – Cinco Villas";2;0;"Ejea de los Caballeros";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"MAZ";3;2;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Viamed Montecanal";4;1;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Clínica Montpellier";2;0;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital Quirón";4;2;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital San Juan de Dios de Zaragoza";3;0;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Clínica Viamed Santiago";0;0;"Huesca";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Clínica El Pilar";0;0;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"C.S. Fraga - Bajo Cinca";1;0;"Fraga";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"Hospital de Jaca";0;0;"Jaca";"Huesca";22125;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
2021-02-23;"H. Hernán Cortés";1;0;"Zaragoza";"Zaragoza";50297;"Fuente Servicio Aragonés de Salud - 20210223_Capacidad-Asistencial.html"
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.
This source diff could not be displayed because it is too large. You can view the blob instead.