Wenn Sie eine lineare Regression in einem Scatterplot mit ggplot2
visualisieren und die Gleichung der Regressionslinie sowie den R^2-Wert im Plot anzeigen möchten, können Sie den folgenden Ansatz verwenden.
Hier ist ein Beispiel, wie Sie dies tun können:
- Erstellen Sie einige Beispieldaten und führen Sie eine lineare Regression durch:
library(ggplot2)
# Beispieldaten
set.seed(123)
daten <- data.frame(
x = rnorm(100),
y = rnorm(100)
)
# Lineare Regression
modell <- lm(y ~ x, data = daten)
- Berechnen Sie die Gleichung der Regressionslinie und den R^2-Wert:
regression_text <- sprintf(
"y = %.2fx + %.2f\nR^2 = %.2f",
coef(modell)[2],
coef(modell)[1],
summary(modell)$r.squared
)
- Fügen Sie die Regressionslinie und das Textlabel zum Plot hinzu:
ggplot(daten, aes(x=x, y=y)) +
geom_point() +
geom_smooth(method = "lm", se = FALSE, color = "red") +
annotate("text", x = Inf, y = Inf, hjust = 1, vjust = 1,
label = regression_text, size = 4, color = "blue") +
theme_minimal()
In diesem Code wird geom_smooth()
verwendet, um die Regressionslinie hinzuzufügen, und annotate()
wird verwendet, um den Regressionsgeradentext und den R^2-Wert in der oberen rechten Ecke des Plots anzuzeigen.
Sie können die Position, Größe und Farbe des Textes anpassen, indem Sie die Argumente in der annotate()
-Funktion ändern.