# load the methylation data
data(methylationDataList)
# plot the coverage in CG context
par(mar=c(4, 4, 3, 1)+0.1)
plotMethylationDataCoverage(methylationDataList[["WT"]],
methylationDataList[["met1-3"]],
breaks = c(1,5,10,15), regions = NULL,
conditionsNames = c("WT","met1-3"),
context = c("CG"), proportion = TRUE,
labels = LETTERS, col = NULL,
pch = c(1,0,16,2,15,17), lty = c(4,1,3,2,6,5),
contextPerRow = FALSE)
## Not run:
# # plot the coverage in all three contexts
# plotMethylationDataCoverage(methylationDataList[["WT"]],
# methylationDataList[["met1-3"]],
# breaks = 1:15, regions = NULL,
# conditionsNames = c("WT","met1-3"),
# context = c("CG", "CHG", "CHH"),
# proportion = TRUE, labels = LETTERS, col = NULL,
# pch = c(1,0,16,2,15,17), lty = c(4,1,3,2,6,5),
# contextPerRow = FALSE)
# ## End(Not run)
Run the code above in your browser using DataLab