marvel.demo <- readRDS(system.file("extdata/data", "marvel.demo.rds", package="MARVEL"))
marvel.demo <- PlotDEValues.PSI.Mean.g2vsg1(MarvelObject=marvel.demo,
method="ad",
pval=0.10,
delta=5
)
# Check output
marvel.demo$DE$PSI$Plot
marvel.demo$DE$PSI$Summary
Run the code above in your browser using DataLab