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