De forma muy breve vamos a comprobar la afirmación de si ya estamos en una cuarta ola, que de forma repetida lanzan en diversos medios de información. library(dplyr) library(ggplot2) library(lubridate) library(gridExtra) data <- read.csv("https://cnecovid.isciii.es/covid19/resources/casos_tecnica_ccaa.csv", stringsAsFactors = F) data <- data %>% filter(fecha >= "2021-01-01", fecha <= "2021-03-28") data$fecha <- ymd(data$fecha) #Podemos ver el número de … Sigue leyendo Actualización Covid (28/3/2021) →