script.R
1
2
3
4
5
6
7
8
9
# compute the correlation
# perform the first stage regression and compute the
fraction of explained variation
# regress `log(wage)` on `education` and save the
result to `wage_mod_1`
# regress `log(wage)` on `education` and controls and
save the result to `wage_mod_2`
# obtain robust coefficient summaries on both models
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX
R Console
1
>
XXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXXX