From 2ac28b02cdf9315c44afdaeb52621b6cd763885b Mon Sep 17 00:00:00 2001 From: RS Date: Tue, 1 Jul 2025 10:49:48 +0200 Subject: [PATCH] Anpassungen und QualPhase verschoben --- Ländervergleich/BL_Informatik_Einfuehrungsphase_Skript.R | 9 +++++++-- .../BL_Informatik_Qualifikationsphase.csv | 0 2 files changed, 7 insertions(+), 2 deletions(-) rename BL_Informatik_Qualifikationsphase.csv => Ländervergleich/BL_Informatik_Qualifikationsphase.csv (100%) 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