# wetter <- Praktikum 4a: Daten importieren und exportieren
Tastaturkürzel
| Einen neuen Code-chunk hinzufügen | Ctrl + Alt + I |
| Code “Zeile für Zeile” innerhalb eines Code-chunks ausführen | Ctrl + Enter |
| Den gesamten Code-chunk ausführen | Ctrl + Shift + Enter |
| (Aus-)kommentieren | Ctrl + Shift + C |
Das Pipe |> |
Ctrl + Shift + M |
Der Zuweisungs-Operator <- |
Alt + - |
Aufgaben
Packages laden
- Ladet die Packages
tidyverse,writexlundjanitor
Daten importieren
- Importiert die “data/ogd_12030_wetter.csv”-Datei mit
read_csv2(). Das sind die Tagesdaten der NBCN-Station (Swiss National Basic Climate Network) Basel-Binningen vom OGD-Portal.
Bereinigt die Namen mit der
janitor::clean_names()-FunktionVerwendet
group_by()undsummarise()um die durschnittliche maximale Tagestemperatur (tagesmaximum_lufttemperatur) pro Jahr zu rechnen:
# wetter_summary <- wetter |>
# group_by(___) |>
# summarise(temp_max = ___)Lest die Warnung/Fehlermeldung. Wie könntet ihr das Problem beheben?
- Option 1:
readr::parse_number() - Option 2:
read_delim()
- Option 1:
Daten exportieren
- Speichert das Ergebnis in einer csv-Datei und einer xlsx-Datei
Datenkodierung
- Ladet “data/urbanisierung-grad_1521.csv” mit
read_delim
# urb_grad <- ___
# glimpse(urb_grad)Etwas stimmt mit den Characters nicht, warum? Benutzt die
readr::guess_encoding()-FunktionWie könntet ihr das Problem beheben? Hint:
?readr::locale.
# urb_grad <- ___("data/urbanisierung-grad_1521.csv", delim = ";", locale = locale(encoding = ___))