File: Fig1a.R

package info (click to toggle)
r-bioc-multiassayexperiment 1.32.0%2Bdfsg-2
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 1,028 kB
  • sloc: makefile: 2
file content (15 lines) | stat: -rw-r--r-- 529 bytes parent folder | download | duplicates (3) 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
 
library(MultiAssayExperiment)

if(!file.exists("gbmMAEO.rds")){
  download.file("http://s3.amazonaws.com/multiassayexperiments/gbmMAEO.rds",
                destfile="gbmMAEO.rds")  
}

gbm = readRDS("gbmMAEO.rds")
lit = gbm[, , c("RNASeq2GeneNorm", "gistica", "Methylation", 
                               "miRNAArray")]

png("upsetSamples.png", width=4, height=4, units="in", res=600)
MultiAssayExperiment::upsetSamples(lit, text.scale=1.3, set_size.angles=45, 
                                   mb.ratio=c(.6,.4))
dev.off()