marvel.demo <- readRDS(system.file("extdata/data", "marvel.demo.rds", package="MARVEL"))
marvel.demo <- IsoSwitch(MarvelObject=marvel.demo,
method="ad",
psi.pval=0.1,
psi.delta=0,
gene.pval=0.1,
gene.log2fc=0.5
)
# Check outputs
head(marvel.demo$DE$Cor$Table_Raw)
head(marvel.demo$DE$Cor$Table)
marvel.demo$DE$Cor$Plot
marvel.demo$DE$Cor$Plot.Stats
Run the code above in your browser using DataLab