Wie erstelle ich in R Studio ein Liniendiagramm mit Pre-Post-Vergleich, das die Streuung und die Verbindung der beiden Zeitpunkte anzeigt?

Um in R Studio ein Liniendiagramm mit einem Pre-Post-Vergleich zu erstellen, das die Streuung anzeigt und die Verbindung der beiden Zeitpunkte darstellt, kannst du die `ggplot2`-Bibliothek verwenden. Hier ist ein Beispiel, wie du das umsetzen kannst: 1. Installiere und lade die `ggplot2`-Bibliothek, falls du sie noch nicht installiert hast: ```R install.packages("ggplot2") library(ggplot2) ``` 2. Erstelle ein Beispiel-Datenset: ```R # Beispiel-Daten erstellen data <- data.frame( Zeit = rep(c("Pre", "Post"), each = 10), Wert = c(rnorm(10, mean = 50, sd = 5), rnorm(10, mean = 55, sd = 5)), Gruppe = rep(1:10, 2) ) ``` 3. Berechne den Mittelwert und die Standardabweichung für die Streuung: ```R library(dplyr) summary_data <- data %>% group_by(Zeit) %>% summarise( Mittelwert = mean(Wert), SD = sd(Wert) ) ``` 4. Erstelle das Liniendiagramm: ```R ggplot(data, aes(x = Zeit, y = Wert, group = Gruppe)) + geom_line(aes(color = as.factor(Gruppe)), alpha = 0.5) + # Linien für jede Gruppe geom_point(aes(color = as.factor(Gruppe)), alpha = 0.5) + # Punkte für jede Gruppe geom_errorbar(data = summary_data, aes(x = Zeit, ymin = Mittelwert - SD, ymax = Mittelwert + SD), width = 0.2) + # Fehlerbalken geom_point(data = summary_data, aes(x = Zeit, y = Mittelwert), size = 4, color = "black") + # Mittelwerte labs(title = "Pre-Post Vergleich mit Streuung", x = "Zeitpunkt", y = "Wert") + theme_minimal() ``` In diesem Beispiel wird ein Liniendiagramm erstellt, das die Werte für die Pre- und Post-Zeitpunkte zeigt, die Streuung durch Fehlerbalken darstellt und die Verbindung zwischen den beiden Zeitpunkten durch Linien zwischen den Gruppen anzeigt. Du kannst die Daten und Parameter nach Bedarf anpassen.