-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathhealth.do
185 lines (121 loc) · 6.97 KB
/
health.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
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
clear
cd "D:\Rati\Blog\Blog 21"
use CB2019_Georgia_response_30Jan2020.dta
******************* DV *******************
///// TRUHLTH -- How much do you trust or distrust healthcare system?
gen health_trust = TRUHLTH
recode health_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
*************************************** IV ****************************************
//// demographic vars: sett, age, gender, education, havejob, minority, internet,
//// wealth index : ownearship of houshold items (utility)
////// religion related questions: RELSERV TRURELI
/// =================================================================================
/// recoding demographic variables
/// =================================================================================
/// STRATUM
gen sett = STRATUM
/// RESPAGE
gen age = RESPAGE
/// gender
/// recoding Female from 2 to 0
gen gender = RESPSEX
recode gender (2=0) /// female = 0
//// RESPEDU => education
/* 1 = secondary or lower 2 = secodanry technical 3 = higher */
gen education = RESPEDU
recode education (1/4 = 1) (5 = 2) (6/8 = 3) (-9 / -1 = .)
//// EMPLSIT => havejob
/* 1 = empl 0 = no */
gen havejob = EMPLSIT
recode havejob (5/6 = 1) (1/4 = 0) (7/8 = 0) (-9 / -1 = . )
/// ETHNIC -- Ethnicity of the respondent => minority
/* 0 = Georgian 1 = Non-Georgian */
gen minority = ETHNIC
recode minority (4 / 7 = 1) (3 =0) (2=1) (1=1) (-9 / -1 = .)
///// Internet exposure FRQINTR => internet
/* 1 = Every day 2 = Less often 3 = Never */
gen internet = FRQINTR
recode internet (1=1) (2/4 =2) (5/6 = 3) (-9 / -1 = .)
//// Wealth Index => utility
foreach var of varlist OWNCOTV OWNDIGC OWNWASH OWNFRDG OWNAIRC OWNCARS OWNCELL OWNCOMP {
gen `var'r = `var'
}
foreach var of varlist OWNCOTVr OWNDIGCr OWNWASHr OWNFRDGr OWNAIRCr OWNCARSr OWNCELLr OWNCOMPr {
recode `var' (-9 / -1 = .)
}
gen utility = (OWNCOTVr + OWNDIGCr + OWNWASHr + OWNFRDGr + OWNAIRCr + OWNCARSr + OWNCELLr + OWNCOMPr)
////// religions questions
//// RELSERV
gen rel_serv = RELSERV
recode rel_serv (-9 / -1 =.) (1 /4= 1) (5=2) (6/7=3)
///// TRURELI -- How much do you trust or distrust religious institutions?
gen reli_trust = TRURELI
recode reli_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
/// TRUARMY -- How much do you trust or distrust army?
gen army_trust = TRUARMY
recode army_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
/// TRUPOLI -- How much do you trust or distrust police?
gen poli_trust = TRUPOLI
recode poli_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
/// TRUBANK -- How much do you trust or distrust banks?
gen bank_trust = TRUBANK
recode bank_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
/// TRUMEDI -- How much do you trust or distrust media?
gen media_trust = TRUMEDI
recode media_trust (-9 / -1 = .) (1/2 = 1) (3=2) (4/5 = 3)
//// Weighting
svyset PSU [pweight=INDWT], strata(SUBSTRATUM) fpc(NPSUSS) singleunit(certainty) || ID, fpc(NHHPSU) || _n, fpc(NADHH)
stop
/// ============================================================================================================================
/// model 1: health_trust IV: i.sett age gender i.education havejob minority internet utility
/// ============================================================================================================================
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility
margins, dydx(*) post
marginsplot, horizontal xline(0) yscale(reverse) recast(scatter)
svy: ologit health_trust i.sett age gender i.education havejob minority internet utility
margins, at(sett=(1 2 3 ))
marginsplot
svy: ologit health_trust i.sett age gender i.education havejob minority internet utility
margins, at(gender=(0 1 ))
marginsplot
svy: ologit health_trust i.sett age gender i.education havejob minority internet utility
margins, at(minority=(0 1 ))
marginsplot
svy: ologit health_trust i.sett age gender i.education havejob minority internet utility
margins, at(internet=(1 2 3))
marginsplot
/// settlement, internet and minority interactions
svy: ologit health_trust i.sett#i.internet age gender i.education havejob minority utility
svy: ologit health_trust i.sett#minority age gender i.education havejob i.internet utility
svy: ologit health_trust i.sett i.internet#minority age gender i.education havejob utility
/// ============================================================================================================================
/// model 2: health_trust IV: i.sett age gender i.education havejob minority internet utility + religous attandance
/// ============================================================================================================================
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.rel_serv
margins, dydx(*) post
marginsplot, horizontal xline(0) yscale(reverse) recast(scatter)
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.rel_serv
margins, at(rel_serv=(1 2 3))
marginsplot
/// ============================================================================================================================
/// model 3: health_trust IV: i.sett age gender i.education havejob minority internet utility + trureli
/// ============================================================================================================================
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.reli_trust
margins, dydx(*) post
marginsplot, horizontal xline(0) yscale(reverse) recast(scatter)
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.reli_trust
margins, at(reli_trust=(1 2 3))
marginsplot
//====================================================================================================================
/// other institutions
//====================================================================================================================
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.army_trust
margins, dydx(*) post
marginsplot, horizontal xline(0) yscale(reverse) recast(scatter)
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.poli_trust
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.bank_trust
svy: ologit health_trust i.sett age gender i.education havejob minority i.internet utility i.media_trust
//====================================================================================================================
/// trusting religious institutions
//====================================================================================================================
svy: ologit reli_trust i.sett age gender i.education havejob minority i.internet utility