if (FALSE) {
group_info <- tcga_clinical_fine %>%
dplyr::filter(Cancer == "BRCA") %>%
dplyr::select(Sample, Code) %>%
dplyr::rename(Group = Code)
vis_dim_dist(
ids = c("TP53", "KRAS", "PTEN", "MDM2", "CDKN1A"),
group_info = group_info
)
}
Run the code above in your browser using DataLab