Applied Econometrics

ts<-caschool_4_$testscr str<-caschool_4_$str reg1<-lm(ts~str) summary(reg1) ####95% CI of the coefficinets########## confint(reg1) #############dummay ########### #package is "dummy" dummy1 <- as.numeric(str>=20) summary (dummy1) reg2=lm(ts~dummy1) summary (reg2)