Überblick Lektion 3
Erzeugen zweier Datenreihen und anzeigen:
x <- c(30, 40, 20, 30)
y <- c(40, 50, 10, 20)
x
y
[1] 30 40 20 30
[1] 40 50 10 20
Zuerst stellen wir die Datenpunkte nochmal im Streudiagramm dar:
plot(x, y, pch=19, xlim=c(0,60), ylim=c(0,60))
Die lineare Regression versucht nun, die Datenpunkte im Streudiagramm durch eine Gerade zu beschreiben. Es geht es darum, die beiden Parameter a und b für diese Gerade zu finden.
In R macht man die einfache Regressionsrechnung mit:
lm(y ~ x)
Call:
lm(formula = y ~ x)
Coefficients:
(Intercept) x
-30 2
Die Parameter a und b werden hier als "Coefficients" bezeichnet. "Intercept" ist der Schnittpunkt mit der y-Achse. Der Parameter a ist also -30. Und der Parameter b ist 2.
Mithilfe der abline()-Funktion können wir die Regressionsgerade auch ganz einfach im Streudiagramm anzeigen: ℹ️ Hinweis
plot(y ~ x, pch=19, xlim=c(0,60), ylim=c(0,60))
abline(lm(y ~ x), col="red")
Auch für unser ℹ️ mtcars Objekt können wir eine Regressionsgerade einblenden:
plot(mtcars$mpg ~ mtcars$wt, pch=19, xlab="Gewicht", ylab="Meilen pro Gallone")
abline(lm(mtcars$mpg ~ mtcars$wt), col="red")
