knitr::opts_chunk$set( collapse = TRUE, comment = "#>", warning = FALSE, message = TRUE, out.width = "100%" )
library(massdataset) library(tidyverse) library(massqc) data("sample_info", package = "massdataset") data("expression_data", package = "massdataset") data("variable_info", package = "massdataset") object = create_mass_dataset( expression_data = expression_data, sample_info = sample_info, variable_info = variable_info ) object
object %>% massqc_sample_correlation() object %>% massqc_sample_correlation() object %>% activate_mass_dataset(what = "sample_info") %>% filter(class == "QC") %>% massqc_sample_correlation() object %>% massqc_sample_correlation(lab = TRUE) object %>% massqc_sample_correlation(lab = TRUE, type = "upper")
sessionInfo()
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.