## Load derfinder for an example set of regions
library('derfinder')
regions <- genomeRegions$regions
## Assign chr length
library('GenomicRanges')
seqlengths(regions) <- c('chr21' = 48129895)
## The output will be saved in the 'derfinderReport-example' directory
dir.create('renderReport-example', showWarnings = FALSE, recursive = TRUE)
## Generate the HTML report
report <- renderReport(regions, 'Example run', pvalueVars = c(
'Q-values' = 'qvalues', 'P-values' = 'pvalues'), densityVars = c(
'Area' = 'area', 'Mean coverage' = 'meanCoverage'),
significantVar = regions$qvalues <= 0.05, nBestRegions = 20,
outdir = 'renderReport-example')
if(interactive()) {
## Browse the report
browseURL(report)
}
## Not run:
# ## Note that you can run the example using:
# example('renderReport', 'regionReport', ask=FALSE)
# ## End(Not run)
## Check the default templates. For users interested in customizing these
## plots.
## For p-value variables:
cat(templatePvalueDensity)
## For continous variables:
cat(templateDensity)
## For Manhattan plots
cat(templateManhattan)
Run the code above in your browser using DataLab