if (FALSE) {
get_clinical_by_sample(study_id = "acc_tcga", sample_id = "TCGA-OR-A5J2-01",
clinical_attribute = "CANCER_TYPE", base_url = 'www.cbioportal.org/api')
ex <- tibble::tribble(
~sample_id, ~study_id,
"P-0001453-T01-IM3", "blca_nmibc_2017",
"P-0002166-T01-IM3", "blca_nmibc_2017",
"P-0003238-T01-IM5", "blca_nmibc_2017",
"P-0000004-T01-IM3", "msk_impact_2017",
"P-0000023-T01-IM3", "msk_impact_2017")
x <- get_clinical_by_sample(sample_study_pairs = ex,
clinical_attribute = NULL, base_url = 'www.cbioportal.org/api')
}
Run the code above in your browser using DataLab