# NOT RUN {
data(methylKit)
cpg.obj=readFeatureFlank(system.file("extdata", "cpgi.hg18.bed.txt",
package = "methylKit"),feature.flank.name=c("CpGi","shores"))
ann=annotateWithFeatureFlank(methylDiff.obj,cpg.obj$CpGi,cpg.obj$shores,
feature.name="CpGi",flank.name="Shores")
getFeatsWithTargetsStats(ann,percentage=TRUE)
# }
Run the code above in your browser using DataLab