diff --git a/Ländervergleich/BL_Informatik_Einfuehrungsphase_Skript.R b/Ländervergleich/BL_Informatik_Einfuehrungsphase_Skript.R index 4ec6e3c..ce7a48d 100644 --- a/Ländervergleich/BL_Informatik_Einfuehrungsphase_Skript.R +++ b/Ländervergleich/BL_Informatik_Einfuehrungsphase_Skript.R @@ -65,9 +65,14 @@ inf_einf_art_gruppiert_gesamt_kurz <- inf_einf_art_gruppiert_gesamt %>% .groups = "drop" # Entferne Gruppierung im Ergebnis ) -# 5) Geodaten mit Einf-Phase-Daten verknüpfen +# # 5) Geodaten mit Einf-Phase-Daten verknüpfen +# germany_data <- germany_states %>% +# left_join(inf_einf, by = c("name" = "Bundesland")) + +# 5) Geodaten mit priorisierten Daten verknüpfen germany_data <- germany_states %>% - left_join(inf_einf, by = c("name" = "Bundesland")) + left_join(inf_einf_art_gruppiert_gesamt_kurz, by = c("name" = "Bundesland")) + # postal-Kürzel korrigieren: Brandenburg → "BB" germany_data <- germany_data %>% diff --git a/BL_Informatik_Qualifikationsphase.csv b/Ländervergleich/BL_Informatik_Qualifikationsphase.csv similarity index 100% rename from BL_Informatik_Qualifikationsphase.csv rename to Ländervergleich/BL_Informatik_Qualifikationsphase.csv