## Not run:
# require(TxDb.Hsapiens.UCSC.hg19.knownGene)
# txdb <- TxDb.Hsapiens.UCSC.hg19.knownGene
# peakfile <- system.file("extdata", "sample_peaks.txt", package="ChIPseeker")
# peakAnno <- annotatePeak(peakfile, TxDb=txdb)
# plotDistToTSS(peakAnno)
# ## End(Not run)
Run the code above in your browser using DataLab