conditional(x, ...)
"conditional"(x, pheno = "cond", group1, group2 = NULL, cnv = 0.2, mr = 0.01, mr.adjust = c("none", "fdr", "bonferroni"), modul = 0.01, modul.adjust = c("none", "fdr", "bonferroni"), fet.pval = 0.05, cores = 1, verbose = TRUE)
data(gbm.expression, package="diggitdata")
data(gbm.cnv, package="diggitdata")
data(gbm.aracne, package="diggitdata")
dobj <- diggitClass(expset=gbmExprs, cnv=gbmCNV, regulon=gbmTFregulon)
dobj <- fCNV(dobj)
dobj <- aqtl(dobj, mr=c("CEBPD", "STAT3"), fcnv.adjust="fdr", verbose=FALSE)
dobj <- conditional(dobj, pheno="subtype", group1="MES", group2="PN", mr="STAT3", verbose=FALSE)
dobj
Run the code above in your browser using DataLab