Fix spacing in vignette

kolesarm · Apr 11, 2024 · cf4d3ae · cf4d3ae
1 parent d14d506
commit cf4d3ae
Show file tree

Hide file tree

Showing 4 changed files with 9 additions and 6 deletions.
diff --git a/doc/RDHonest.R b/doc/RDHonest.R
@@ -77,8 +77,9 @@ rn
 rc
 
 ## -----------------------------------------------------------------------------
-100 * (1 - (rc$coefficients$conf.high-rc$coefficients$conf.low) /
-           (rn$coefficients$conf.high-rn$coefficients$conf.low))
+ci_len <- c(rc$coefficients$conf.high-rc$coefficients$conf.low,
+            rn$coefficients$conf.high-rn$coefficients$conf.low)
+100 * (1 - ci_len[1]/ci_len[2])
 
 ## -----------------------------------------------------------------------------
 dd <- data.frame()

diff --git a/doc/RDHonest.Rmd b/doc/RDHonest.Rmd
@@ -702,8 +702,9 @@ rule-of-thumb curvature and also smaller standard errors (this would be true
 even if the bandwidth was kept fixed). Correspondingly, the CIs are tighter by
 about 6 percentage points:
 ```{r}
-100 * (1 - (rc$coefficients$conf.high-rc$coefficients$conf.low) /
-           (rn$coefficients$conf.high-rn$coefficients$conf.low))
+ci_len <- c(rc$coefficients$conf.high-rc$coefficients$conf.low,
+            rn$coefficients$conf.high-rn$coefficients$conf.low)
+100 * (1 - ci_len[1]/ci_len[2])
 ```
 
 In the fuzzy RD case, we need to covariate-adjust the treatment $D_i$ as well as

diff --git a/doc/RDHonest.pdf b/doc/RDHonest.pdf
diff --git a/vignettes/RDHonest.Rmd b/vignettes/RDHonest.Rmd
@@ -702,8 +702,9 @@ rule-of-thumb curvature and also smaller standard errors (this would be true
 even if the bandwidth was kept fixed). Correspondingly, the CIs are tighter by
 about 6 percentage points:
 ```{r}
-100 * (1 - (rc$coefficients$conf.high-rc$coefficients$conf.low) /
-           (rn$coefficients$conf.high-rn$coefficients$conf.low))
+ci_len <- c(rc$coefficients$conf.high-rc$coefficients$conf.low,
+            rn$coefficients$conf.high-rn$coefficients$conf.low)
+100 * (1 - ci_len[1]/ci_len[2])
 ```
 
 In the fuzzy RD case, we need to covariate-adjust the treatment $D_i$ as well as