rkidata | R Documentation |
RKI Daten komplett
rkidata
a data.frame of of 18 variables
FID
int 40613780 40613781 40613782 40613783 40613784 40613785 40613786 40613787 40613788 40613789 ...
IdBundesland
1 1 1 1 1 1 1 1 1 1 ...
Bundesland
chr "Schleswig-Holstein" "Schleswig-Holstein" "Schleswig-Holstein" "Schleswig-Holstein" ...
Landkreis
chr "SK Flensburg" "SK Flensburg" "SK Flensburg" "SK Flensburg" ...
Altersgruppe
chr "A00-A04" "A00-A04" "A00-A04" "A05-A14" ...
Geschlecht
chr "M" "W" "W" "M" ...
AnzahlFall
int 1 1 1 1 1 1 1 1 1 1 ...
AnzahlTodesfall
...
Meldedatum
chr "2020/09/30 00:00:00" "2020/08/24 00:00:00" "2020/09/26 00:00:00" "2020/09/25 00:00:00" ...
IdLandkreis
int 1001 1001 1001 1001 1001 1001 1001 1001 1001 1001 ...
Datenstand
"04.10.2020, 00:00 Uhr" "04.10.2020, 00:00 Uhr" "04.10.2020, 00:00 Uhr" "04.10.2020, 00:00 Uhr" ...
NeuerFall
int 0 0 0 0 0 0 0 0 0 0 ...
NeuerTodesfall
int -9 -9 -9 -9 -9 -9 -9 -9 -9 -9 ...
Refdatum
chr "2020/09/30 00:00:00" "2020/08/24 00:00:00" "2020/09/26 00:00:00" "2020/09/21 00:00:00" ...
NeuGenesen
int -9 0 -9 -9 -9 -9 0 -9 -9 0 ...
AnzahlGenesen
int 0 1 0 0 0 0 1 0 0 1 ...
IstErkrankungsbeginn
int 0 0 0 1 1 0 0 1 0 1 ...
Altergruppe2
chr "Nicht übermittelt" "Nicht übermittelt" "Nicht übermittelt" "Nicht übermittelt" ...
Heruntergeladen mittels
wget https://www.arcgis.com/sharing/rest/content/items/f10774f1c63e40168479a1feb6c7ca74/data
Eingelesen mittels rkidata <- read.csv("data", header=TRUE,encoding="UTF-8")
Eingepflegt mittel usethis::use_data(rkidata)
Weiterverabeitung z.B. mit:
rkidataobk <- rkidata[rkidata$Landkreis == "LK Oberbergischer Kreis", ]
rkidataobk$Meldedatum <- as.Date(rkidataobk$Meldedatum)
sum(rkidataobk$AnzahlFall)
sum(rkidataobk$AnzahlTodesfall)
rkidataobkAgg <- as.data.frame(xtabs( AnzahlFall ~ Meldedatum, rkidataobk))
plot(rkidataobkAgg$Meldedatum, rkidataobkAgg$Freq)
Ein data.frame mit 18 Variablen
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.