# \donttest{
data(exampleData)
##################################
# Example 1: gene set analysis #
##################################
res <- geneSetAnalysis(
# parameters for geneSetAnalysis
dat = countdata,
geneSets = pathways[1],
analysis = analysis.averageCorrelation(),
adjustmentMethod = "fdr",
# additional parameters for analysis.averageCorrelation
labs = labels,
method = "pearson",
numSamples = 50)
summary(res, mode="table")
####################################
# Example 2: uncertainty analysis #
####################################
resUncertainty <- evaluateGeneSetUncertainty(
# parameters for evaluateGeneSetUncertainty
dat = countdata,
geneSet = pathways[[3]],
analysis = analysis.averageCorrelation(),
numSamplesUncertainty = 5,
blockSize = 1,
k = seq(0.1,0.9,by=0.1),
# additional parameters for analysis.averageCorrelation
labs = labels,
numSamples = 5)
plot(resUncertainty, main = names(pathways[3]))
# }
Run the code above in your browser using DataLab