Skip to content
Snippets Groups Projects
Commit 8feffdb4 authored by nc71qaxa's avatar nc71qaxa
Browse files

tables_adjustment

parent b1946762
Branches
No related tags found
No related merge requests found
......@@ -143,9 +143,9 @@ datatable(treatment_socio_C)
## NR OLS
::: {style="font-size: 45%;"}
::: {style="font-size: 65%;"}
```{r, results='asis'}
htmlreg(l=list(nr_model_treat_A),
htmlreg(l=list(nr_model_treat_A), single.row = TRUE,
custom.model.names = c("OLS regression"),
custom.header = list("Dependent variable: NR-Index" = 1),
custom.coef.map = list("(Intercept)" = "Intercept", "as.factor(Treatment_A)Treated" = "Treated", "as.factor(Treatment_A)Vol_Treated" = "Vol. Treated",
......@@ -162,7 +162,7 @@ htmlreg(l=list(nr_model_treat_A),
## Logit Regression: Who choses treatment?
::: {style="font-size: 50%;"}
::: {style="font-size: 65%;"}
```{r, results='asis'}
......@@ -170,7 +170,7 @@ htmlreg(l=list(logit_choice_treat_uni), stars = c(0.01, 0.05, 0.1), float.pos="t
custom.model.names = c("Logit regression"),
custom.header = list("Dependent variable: Voluntary Information Access" = 1),
custom.coef.map = list_ols, custom.note = "%stars. Standard errors in parentheses.",
label = "tab:logit_vt")
label = "tab:logit_vt", single.row = TRUE)
```
......@@ -200,14 +200,14 @@ bxplt_interview_time_C
## OLS Engagement: Interview time
::: {style="font-size: 38%;"}
::: {style="font-size: 60%;"}
```{r, results='asis'}
htmlreg(l=list(ols_time_spent_A, ols_time_spent_control_A, ols_time_spent_C, ols_time_spent_control_C),
custom.model.names = c("Case A", "with Controls", "Case C", "with Controls"),
custom.header = list("Dependent variable: Net interview time" = 1:4),
custom.coef.map = list_ols, stars = c(0.01, 0.05, 0.1), float.pos="tb",
custom.note = "%stars. Standard errors in parentheses.",
label = "tab:net_int")
label = "tab:net_int", single.row = TRUE)
```
:::
......@@ -235,14 +235,14 @@ bxplt_cc_time_C
## OLS Engagement: Choice Card Time
::: {style="font-size: 38%;"}
::: {style="font-size: 60%;"}
```{r, results='asis'}
htmlreg(l=list(ols_time_cc_A, ols_time_cc_control_A, ols_time_cc_C, ols_time_cc_control_C),
custom.model.names = c("Case A", "with Controls", "Case C", "with Controls"),
custom.header = list("Dependent variable: Mean choice card time" = 1:4),
custom.coef.map = list_ols, stars = c(0.01, 0.05, 0.1), float.pos="tb",
custom.note = "%stars. Standard errors in parentheses.",
label = "tab:cctime")
label = "tab:cctime", single.row = TRUE)
```
:::
......@@ -270,14 +270,14 @@ bxplt_quiz_C
## OLS: Manipulation check
::: {style="font-size: 38%;"}
::: {style="font-size: 60%;"}
```{r, results='asis'}
htmlreg(l=list(ols_percentage_correct_A, ols_percentage_correct_control_A, ols_percentage_correct_C, ols_percentage_correct_control_C),
custom.model.names = c("Case A", "with Controls", "Case C", "with Controls"),
custom.header = list("Dependent Variable: Percentage of correct quiz statements" = 1:4),
custom.coef.map = list_ols, stars = c(0.01, 0.05, 0.1), float.pos="tb",
custom.note = "%stars. Standard errors in parentheses.",
label = "tab:mani")
label = "tab:mani", single.row = TRUE)
```
:::
......@@ -295,14 +295,14 @@ htmlreg(l=list(ols_percentage_correct_A, ols_percentage_correct_control_A, ols_
## OLS: Consequentiality
::: {style="font-size: 38%;"}
::: {style="font-size: 60%;"}
```{r, results='asis'}
htmlreg(l=list(conseq_model_A, conseq_model_control_A, conseq_model_C, conseq_model_control_C),
custom.model.names = c("Case A", "with Controls", "Case C", "with Controls"),
custom.header = list("Dependent variable: Consequentiality score" = 1:4),
custom.coef.map = list_ols, stars = c(0.01, 0.05, 0.1), float.pos="tb",
custom.note = "%stars. Standard errors in parentheses.",
label = "tab:conseq")
label = "tab:conseq", single.row = TRUE)
```
:::
......@@ -330,14 +330,14 @@ bxplt_opt_C
## OLS: Opt-out
::: {style="font-size: 38%;"}
::: {style="font-size: 60%;"}
```{r, results='asis'}
htmlreg(l=list(ols_opt_out_A, ols_opt_out_control_A, ols_opt_out_C, ols_opt_out_control_C),
custom.model.names = c("Case A", "with Controls", "Case C", "with Controls"),
custom.header = list("Dependent variable: Number of opt-out choices" = 1:4),
custom.coef.map = list_ols, stars = c(0.01, 0.05, 0.1), float.pos="tb",
custom.note = "%stars. Standard errors in parentheses.",
label = "tab:optout")
label = "tab:optout", single.row = TRUE)
```
:::
......@@ -461,6 +461,7 @@ summary(mxl_wtp_NR_case_c_rentINT)
summary(case_d)
```
## Takeaways
<!-- ## MXL: WTP space -->
<!-- ::: panel-tabset -->
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment