year1<-filter(core2,year==1)
linearMod_y1 <- lm(zpost_test ~ treat + pre_test +Male +Grade09+Grade10+Grade11+Grade12+Other+Black+hispanic+Par_BA+par_edu_miss, data=year1)
print(linearMod_y1)
year1<-filter(core2,year==1)
linearMod_y1 <- lm(zpost_test ~ treat + pre_test +Male +Grade09+Grade10+Grade11+Grade12+Other+Black+hispanic+Par_BA+par_edu_miss, data=year1)
print(linearMod_y1)