CoronaSH, COVID19, Schleswig-Holstein
Hier der erste Versuch mit Quarto aktuelle Zahlen von Corona in SH darzustellen.
Quelle: auf dem Open Data-Portal der Landesregierung SH -
library(lubridate)
library(dplyr)
url <- read.csv(url("https://phpefi.schleswig-holstein.de/corona/data202011/cvd_sh_verlauf.csv"))
data_txt <- head(url,4)
data_txt$Datum <- dmy(data_txt$Datum)
data_txt <- data_txt[-c(2,4)]
plot( x = data_txt$Datum, y= data_txt$Hospitalisierungen, type="l", xlab="Datum", ylab="Hospitalisierungen")
Ich bin hier noch am experimentieren. Die Aussagekraft der Grafik ist jetzt nicht so groß. Das liegt aber auch daran, dass ich nicht wie geplant die Open Data der Inzidenzen gefunden habe im Open Data Portal des Landes. Mir ist ach noch unklar, warum plot() die Datumsangaben plötzlich automatisch in Wochentagnamen umwandelt.
Aber ich bin schon größtenteils mit der Arbeitsweise überzeugt, dass die Umstellung von Wordpress auf Quarto der richtige Schritt war, weil ich hier kaum Einschränkungen habe. Das Laden des Editors von Wordpress kostet doch oft viel Zeit und irgendeinen Code einzubauen ist schon fast gar nicht möglich, insbesondere nicht auf einem gehosteten wordpress.com. Meine Wahl damals auf ein gehostetes Wordpress.com beruhte auch daher, da ich keine Lust hatte ständig meine Software zu aktualisieren.
Mit Quarto muss man jetzt Software eigentlich gar nicht mehr aktualisieren, weil die Seite nicht mehr mit PHP läuft.
Zurück nach oben