# Daten einlesen library(foreign) Datenmatrix <- read.spss("./daten/gehalt.sav", use.value.labels=TRUE, max.value.labels=Inf, to.data.frame=TRUE) attach(Datenmatrix) # Durchführung der Regressionsanalyse (ohne zusätzliche Dummyvariablen): Gehalt.lm1 = lm(Einstiegsgehalt ~ Studiendauer) summary(Gehalt.lm1) # Durchführung der Regressionsanalyse (mit zusätzlichen Dummyvariablen): Gehalt.lm3 = lm(Einstiegsgehalt ~ Studiendauer + Dummy_Physik + Dummy_Chemie) summary(Gehalt.lm3)