powered by
ledge(mobj)
msviper
data(bcellViper, package="bcellViper") sig <- rowTtest(dset, "description", "CB", "N")$statistic mra <- msviper(sig, regulon) mra <- ledge(mra) summary(mra)
Run the code above in your browser using DataLab