Better fix for the chunks that require R 4.4.0 or later

vignettes/perform_mr.Rmd

@@ -13,6 +13,7 @@ vignette: >
 ---
 
 ```{r, include=FALSE}
+evalinr44 <- getRversion() >= '4.4.0'
 knitr::opts_chunk$set(
   collapse = TRUE,
   comment = "#>",
@@ -633,7 +634,7 @@ ld_mat
 
 Here `ld_matrix()` returns the LD correlation values (not R^2^) for each pair of variants present in the 1000 genomes data set.
 
-```{r eval=FALSE}
+```{r}
 dat <- harmonise_data(
   exposure_dat = bmi_exp_dat,
   outcome_dat = chd_out_dat
@@ -642,19 +643,19 @@ dat <- harmonise_data(
 
 Convert to the `MRInput` format for the MendelianRandomization package:
 
-```{r eval=FALSE}
+```{r eval=evalinr44}
 dat2 <- dat_to_MRInput(dat)
 ```
 
 This produces a list of `MRInput` objects that can be used with the MendelianRandomization functions, e.g.
 
-```{r eval=FALSE}
+```{r eval=evalinr44}
 MendelianRandomization::mr_ivw(dat2[[1]])
 ```
 
 Alternatively, convert to the `MRInput` format but also obtaining the LD matrix for the instruments
 
-```{r eval=FALSE}
+```{r eval=evalinr44}
 dat2 <- dat_to_MRInput(dat, get_correlation = TRUE)
 MendelianRandomization::mr_ivw(dat2[[1]], correl = TRUE)
 ```