knitr::opts_chunk$set( collapse = TRUE, comment = "#>" ) options(width = 140)

Test for association between a set of SNPS/genes and continuous or binary outcomes by including variant characteristic information and using (weighted) score statistics.
Note:
#| eval: false # Install MiSTr from CRAN: install.packages("MiSTr") # Or the the development version from GitHub: # install.packages("remotes") remotes::install_github("mcanouil/MiSTr")
library(MiSTr) data(mist_data) attach(mist_data)
res <- mist( y = phenotypes[, "y_taupi"], X = phenotypes[, paste0("x_cov", 0:2)], G = genotypes, Z = variants_info[, 1, drop = FALSE] ) str(res) print(res)
res <- mist( y = phenotypes[, "y_binary"], X = phenotypes[, paste0("x_cov", 0:2)], G = genotypes, Z = variants_info[, 1, drop = FALSE] ) str(res) print(res)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.