## Shortly running example. For a more realistic example that takes
## some more time, run the same procedure with the full BEclearData
## dataset.
## Whole procedure that has to be done to use this function.
## Correct the example data for a batch effect
data(BEclearData)
ex.data <- ex.data[31:90,7:26]
ex.samples <- ex.samples[7:26,]
# Note that row- and block sizes are just set to 10 to get a short runtime. To
# use these parameters, either use the default values or please note the
# description in the details section of \code{\link{BEclear}}
result <- correctBatchEffect(data=ex.data, samples=ex.samples, parallel=TRUE,
cores=4, adjusted=TRUE, method="fdr", rowBlockSize=10, colBlockSize=10,
epochs=50, outputFormat="RData", dir=getwd())
# Unlist variables
medians <- result$medians
pvals <- result$pvals
summary <- result$summary
score <- result$score.table
cleared <- result$clearedData
predicted <- result$predictedData
corrected <- result$correctedPredictedData
Run the code above in your browser using DataLab