dataICUBeds20200821 | R Documentation |
A data set of COVID-19 ICU beds with 113 obs. of 3 variables.
dataICUBeds20200821
A data frame with the following entries:
640 597 538 553 591 573 593 527 529 508 ...
int 1549 1508 1441 1396 1346 1311 1230 1185 1121 1073 ...
Date, format: '2020-05-01' '2020-05-02' '2020-05-03' '2020-05-04' ...
The data frame was generated as follows:
icu <- icudata
icuCov <- as.data.frame(xtabs( faelle_covid_aktuell ~ daten_stand, icu))
icuCov$daten_stand <- as.Date(icuCov$daten_stand)
icuCovBeatm <- as.data.frame(xtabs(faelle_covid_aktuell_beatmet ~ daten_stand, icu))
icuCovBeatm$daten_stand <- as.Date(icuCovBeatm$daten_stand)
dataICUBeds20200821 <- data.frame(bed=(icuCov$Freq - icuCovBeatm$Freq), intensiveBedVentilation=icuCovBeatm$Freq, Day = as.Date(icuCovBeatm$daten_stand))
x <- dataICUBeds20200821 # first look str(x) # plot x <- dataICUBeds20200821 plot(x$Day, x$bed, type = "o") lines(x$Day, x$intensiveBedVentilation, type = "o", col = "red")
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.