-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy path.Rhistory
117 lines (117 loc) · 15 KB
/
.Rhistory
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
knitr::opts_chunk$set(echo = TRUE)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI,all_states_w_inflation)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC,all_states_no_poli)
library(ivprobit)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI,all_states_w_inflation)
summary(probit1)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY,all_states_no_inflation)
summary(probit2)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC,all_states_no_poli)
summary(probit3)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit1)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+state_inf_t+state_inf_nt,all_states_w_inflation)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC,all_states_no_poli)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC,all_states_no_poli)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+IL+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+IL+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY+DC,all_states_no_poli)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+state_inf_t+state_inf_nt,all_states_w_inflation)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+AR+CO+CT+FL+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+state_inf_t+state_inf_nt,all_states_w_inflation)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit1)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+AR+CO+CT+FL+GA+IL+IN+KS+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OK+OR+PA+TX+UT+VA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY,all_states_no_inflation)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ID+KY+ME+MT+ND+NE+NH+NM+NV+RI+SD+VT+WV+WY,all_states_no_inflation)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ME+MT+NE+NM+NV+RI+SD+VT+WV|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ME+MT+NE+NM+NV+RI+SD+VT+WV,all_states_no_inflation)
summary(probit2)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ME+MT+NE+NM+NV+RI+SD+VT+WV+DC|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+AR+CO+CT+FL+IL+MA+MD+MI+MN+MO+NC+NJ+NY+OH+OR+PA+WA+WI+AZ+DE+IA+ME+MT+NE+NM+NV+RI+SD+VT+WV+DC,all_states_no_poli)
summary(probit3)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+1995+1996|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+1995+1996+state_inf_t+state_inf_nt,all_states_w_inflation)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+1995+1996|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+1995+1996+state_inf_t+state_inf_nt,all_states_w_inflation)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+yr1995+yr1996|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+yr1995+yr1996+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit1)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit1)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020,all_states_no_inflation)
summary(probit2)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020,all_states_no_poli)
summary(probit3)
all_states_no_inflation
head(all_states_no_inflation)
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
probit0 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit0)
setwd("/Users/rohanjha/Documents/Cal/Econ_191/exploring_data")
all_states_w_inflation <- read.csv("all_states_w_inflation.csv")
all_states_w_inflation <- all_states_w_inflation[, -1]
probit1 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+state_inf+state_inf_t+state_inf_nt+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+state_inf+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+state_inf_t+state_inf_nt,all_states_w_inflation)
summary(probit1)
all_states_no_inflation <- read.csv("all_states_no_inflation.csv")
all_states_no_inflation <- all_states_no_inflation[, -1]
probit2 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+prop_rep+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020|change_prop_on_strike_indicator|Priv.Union.Members....+prop_rep+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020,all_states_no_inflation)
summary(probit2)
all_states_no_poli <- read.csv("all_states_no_poli.csv")
all_states_no_poli <- all_states_no_poli[, -1]
probit3 <- ivprobit(Wage_Increase_Indicator~Priv.Union.Members....+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020|change_prop_on_strike_indicator|Priv.Union.Members....+instrument_calc+yr1995+yr1996+yr1997+yr1998+yr1999+yr2000+yr2001+yr2002+yr2003+yr2003+yr2005+yr2006+yr2007+yr2008+yr2009+yr2010+yr2011+yr2012+yr2013+yr2014+yr2015+yr2016+yr2017+yr2018+yr2019+yr2020,all_states_no_poli)
summary(probit3)
summary(ivprobit)
summary.ivprobit
library(ivprobit)
summary.ivprobit
summary.ivprobit
summary(ivprobit)