Convert an object of class MRMVInput from the MendelianRandomization package to the MVMR mvmr_format class

Creates a data.frame with additional class mvmr_format from an object of class MRMVInput generated by MendelianRandomization::mr_mvinput().

Usage

mrmvinput_to_mvmr_format(dat)

Arguments

dat

Object from MendelianRandomization::mr_mvinput().

Value

Object of class mvmr_format, the MVMR format

Examples

if (require("MendelianRandomization", quietly = TRUE)) {
  bx <- as.matrix(rawdat_mvmr[, c("LDL_beta", "HDL_beta")])
  bxse <- as.matrix(rawdat_mvmr[, c("LDL_se", "HDL_se")])
  dat <- MendelianRandomization::mr_mvinput(
    bx = bx,
    bxse = bxse,
    by = rawdat_mvmr$SBP_beta,
    byse = rawdat_mvmr$SBP_se,
    snps = rawdat_mvmr$SNP
  )
  dat <- mrmvinput_to_mvmr_format(dat)
  head(dat)
  class(dat)
}
#> [1] "data.frame"  "mvmr_format"