Lineare Regression

Aufgabe:

Man ermittle die Regressionsgerade für die folgenden Punkte:
P1:[-2,2];
P2:[-1,0];
P3:[1,1];
P4:[2,3];
P5:[3,4];


Code
:

numer:true;
P1:[-2,2];
P2:[-1,0];
P3:[1,1];
P4:[2,3];
P5:[3,4];
n:5;
x:makelist(concat(P,i)[1],i,1,n);
y:makelist(concat(P,i)[2],i,1,n);
g1:a*sum(x[i]^2,i,1,n)+b*sum(x[i],i,1,n)=sum(x[i]*y[i],i,1,n);
g2:a*sum(x[i],i,1,n)+b*n=sum(y[i],i,1,n);
l:solve([g1,g2],[a,b]);
Regressionsgerade:Y=a*X+b,l;

Die Regressionsgleichungen g1 und g2 sind die Lösung einer Extremwertaufgabe!


wxMaxima
:

Bildschirmfoto-wxMaxima 15.04.0  [ linreg.wxmx ].png

Geogebra CAS (mit Bibliotheksfunktion):

Bildschirmfoto-linreg-bf.ggb

Wenn man Bibliotheksfunktionen verwendet, sollte man ihre Funktion verstehen!


Geogebra CAS
:

linreg-ggb-kl