Description Usage Arguments Examples
View source: R/doMultCompAnalysis.R
Function for make the comparative analysis.
1 | doMultCompAnalysis(mcPar)
|
mcPar |
List object that contains the parameters. |
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 | ## Not run:
mcParsList <- list()
compName <- c("Group1", "Group2")
wCont <- 1:ncol(cont.matrix)
pValCutOff <- c(0.01, 0.01)
adjMethod <- c("none", "none")
minLogFoldChange <- c(1, 1)
for(i in 1:length(compName))
{
pvalType <- ifelse(adjMethod[i] == "none", "p-values", "adj. p-values")
mci <- list(fitMain = fitMain,
fitFileName = fitFileName,
whichContrasts = wCont[[i]],
comparisonName = compName[i],
titleText = paste("for", pvalType, "<", pValCutOff[i],
"and |logFC| >", minLogFoldChange[i]),
anotPackage = "org.Hs.eg",
my.symbols = symbolsTable,
outputDir = outputDir,
fileOfLinks = linksFile,
multCompMethod = "separate",
adjustMethod = adjMethod[i],
selectionType = "any",
P.Value.cutoff = pValCutOff[i],
plotVenn = TRUE,
colsVenn = NULL,
vennColors= c("red", "yellow", "green", "blue", "pink"),
cexVenn = 1,
geneListFName = paste("geneList", compName[i], pvalType,
"LT", pValCutOff[i], "Rda", sep = "."),
minLogFC = minLogFoldChange[i],
csvType = csvType)
mcParsList <- add2parsList(mcParsList, mci)
}
for(ix in 1:length(mcParsList))
{
geneList.MCi <- BasicP::doMultCompAnalysis(mcParsList[ix])
}
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.