library("COHCAP")
dir <- system.file("extdata", package="COHCAP")
bed.folder <- file.path(dir,"BSSeq")
gene.table <- file.path(dir,"GENCODE_Genes_truncated.bed")
targeted.regions <- file.path(dir,"UCSC_CpG_Islands_truncated.bed")
output.folder <- getwd()
annotation.file <- file.path(output.folder,"COHCAP.targeted.BSSeq.anno.txt")
cohcap.inputfile <- file.path(output.folder,"BS_Seq_combined.txt")
COHCAP.BSSeq.preprocess(bed.folder, cohcap.inputfile, gene.table,
targeted.regions,annotation.file)
Run the code above in your browser using DataLab