Updating Unit 02 to build

Author: salernos

vignettes/Unit02_BMIvDXA.Rmd

@@ -588,33 +588,30 @@ We now apply **IPD** to leverage all participants (labeled + unlabeled) while ad
 >
 > We can either provide a single, *combined* dataset to the `data` argument and the name of the column that gives the set labels in `label`:
 >
->```r
 > ipd_bmi_1 <- ipd(
 >   formula = obese_DXA - obese_BMI ~ Age + Sex + Race,
 >   data    = combined,
 >   label   = "set_label",
 >   model   = "logistic",
 >   method  = "pspa"
 > )
-> ```
 >
 > **or** we can provide the *labeled* set to `data` and the *unlabeled* set to `unlabeled_data` separately:
 >
-> ```r
 > ipd_bmi_2 <- ipd(
 >   formula        = obese_DXA - obese_BMI ~ Age + Sex + Race,
 >   data           = labeled,
 >   unlabeled_data = unlabeled,
 >   model          = "logistic",
 >   method         = "pspa"
 > )
-> ```
 
 Now we can try to run the IPD model:
 
 ```{r, eval=FALSE}
 # Note: This code chunk results in an error, but we have an informative warning
 # We can try running it and see!
+
 ipd_bmi_fit <- ipd(
     formula = obese_DXA - obese_BMI ~ Age + Sex + Race,
     method  = "pspa",