if (interactive()){
# A simple gene-level example
cpo <- cpo_example
# Launch visualization with all genes
visualise(cpo, degs_only = FALSE)
# Launch with only significant genes
visualise(cpo, deg_threshold = 0.05)
# Launch with specific genes
visualise(cpo, subset = c("g001","g002","g003"))
}
Run the code above in your browser using DataLab