packagedown labels

Author: audreyyeoCH

vignettes/introduction.Rmd

@@ -613,7 +613,7 @@ ex1_prior_caption <- paste(
 )
 ```
 
-```{r ex1-prior, echo=TRUE, fig.cap = ex1_prior_caption}
+```{r fig:ex1-prior, echo=TRUE, fig.cap = ex1_prior_caption}
 xx <- seq(0, 1, .001)
 dens.control <- dbeta(xx, 75, 75) # Posterior of the control
 dens.prior <- dbeta(xx, 5.75, 4.25) # Prior of the Phase 1b trial
@@ -830,7 +830,7 @@ ex1_betadiff_1_cap <- paste(
 )
 ```
 
-```{r ex1:betadiff1, echo=TRUE, out.width="4in"}
+```{r fig:ex1:betadiff1, echo=TRUE, out.width="4in"}
 parX <- c(75, 75)
 parY <- c(5.75 + 55, 4.25 + 80 - 55)
 xx <- seq(-0.5, 0.75, 0.001)