-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path5003IntactFact.do
133 lines (88 loc) · 3.92 KB
/
5003IntactFact.do
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
*** do 5003IntactFact
** Run interactions using factor variable syntax and imputed data
** Interaction effects
global log "5003IntactFact"
global logN "5003"
global dsold "2000Impute"
capture log close
clear all
version 13
set matsize 800
set mem 400000k
set linesize 140
set more off
log using "$log", t replace
use "$dsold", clear
*** Models
local Ys "pellrates nonpellrates pellgap pellratio"
global Ys "pellrates nonpellrates pellgap pellratio"
local mYs "pellgap pellratio"
local Xs "perfrat persoror greekyes"
global Xs "perfrat persoror greekyes"
local Select " Ndegsel Accept0712 Private"
global iSelect "i.Ndegsel c.Accept0712 Private"
local mSelect "m.Ndegsel Accept0712 Private"
local Controls "pellper0712 np_linc0813K Nmininst perWomen perBlkHis perSTEM lnendow0712K schsize0712K urbanicity4 Region"
global iControls "pellper0712 np_linc0813K Nmininst perWomen perBlkHis perSTEM c.lnendow0712K schsize0712K i.urbanicity4 i.Region"
*** MI Setup
mi import ice, automatic
mi unregister Findnotes Anotes Qnotes Samplenotes pellrates nonpellrates pellgap pellratio pellcomp nonpellcomp
mi describe
mi convert wide, clear
mi xeq 1: sum `Ys' `Xs' `Select' `Controls' if ccvar==1, sep(0)
sum $Ys $Xs _1_persoror _1_perGreek _1_greekyes if ccvar==1
** Drop (234207) Washington and Lee University for wrong reporting of perfrat & persoror
drop if unitid==234207
sum $Ys $Xs _1_persoror _1_perGreek _1_greekyes if ccvar==1
*** Interactions using factor variable syntax
**1 % Greek and Greek house
global X "perfrat"
** Table 03: Gap = (Non-Pell rates - Pell rates)
global title "Table 03: Gap = (Non-Pell rates - Pell rates)"
global Y "pellgap"
qui mi estimate, ni(20) dots post: regress $Y c.$X
estimates store M1
qui mi estimate, ni(20) dots post: regress $Y i.greekyes
estimates store M2
qui mi estimate, ni(20) dots post: regress $Y c.$X i.greekyes
estimates store M3
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes
estimates store M4
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect
estimates store M5
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect $iControls
estimates store M6
estimates table M1 M2 M3 M4 M5 M6, b(%9.3f) star(.001 .01 .05) stats(N F_mi p_mi) title($title)
** Table 04: non-Pell graduation rates
global title "Table 04: non-Pell graduation rates"
global Y "nonpellrates"
qui mi estimate, ni(20) dots post: regress $Y c.$X
estimates store M1
qui mi estimate, ni(20) dots post: regress $Y i.greekyes
estimates store M2
qui mi estimate, ni(20) dots post: regress $Y c.$X i.greekyes
estimates store M3
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes
estimates store M4
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect
estimates store M5
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect $iControls
estimates store M6
estimates table M1 M2 M3 M4 M5 M6, b(%9.3f) star(.001 .01 .05) stats(N F_mi p_mi) title($title)
** Table 05: Pell graduation rates
global title "Table 05: Pell graduation rates"
global Y "pellrates"
qui mi estimate, ni(20) dots post: regress $Y c.$X
estimates store M1
qui mi estimate, ni(20) dots post: regress $Y i.greekyes
estimates store M2
qui mi estimate, ni(20) dots post: regress $Y c.$X i.greekyes
estimates store M3
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes
estimates store M4
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect
estimates store M5
qui mi estimate, ni(20) dots post: regress $Y c.$X#ibn.greekyes $iSelect $iControls
estimates store M6
estimates table M1 M2 M3 M4 M5 M6, b(%9.3f) star(.001 .01 .05) stats(N F_mi p_mi) title($title)
log close