# NOT RUN {
# Loading robust profiles across different breast cancer cell lines generated by retriever.
# BRCA <- retriever(cellLines = c('MDAMB231', 'MCF7', 'SKBR3', 'HS578T', 'BT20'))
BRCA <- read.csv(system.file("BRCA.csv",package="retriever"), row.names = 1)
dim(BRCA)
# [1] 1001 125
# Computing response profiles combinations
combinationsBRCA <- profileCombinations(BRCA)
dim(combinationsBRCA)
# [1] 1001 7750
# }
Run the code above in your browser using DataLab