diff --git a/project_start.qmd b/project_start.qmd index 9c73a06a3057056cbcc2cf98830a60b3bb70beb4..352b8f25e99e11cd5d7e7c53a21e3d095dffca61 100644 --- a/project_start.qmd +++ b/project_start.qmd @@ -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 -->