comparison chipeakanno_annopeaks.R @ 4:b5bc7e70b949 draft

planemo upload for repository https://github.com/kpbioteam/chipeakanno_annopeaks commit e4ccaafda5f770219ab999f48574a3bfed84c311
author kpbioteam
date Tue, 12 Jun 2018 08:46:36 -0400
parents 9ec5e9e2e7b2
children 17b814d78ac6
comparison
equal deleted inserted replaced
3:9ec5e9e2e7b2 4:b5bc7e70b949
26 annoData <- toGRanges(EnsDb.Hsapiens.v75) 26 annoData <- toGRanges(EnsDb.Hsapiens.v75)
27 seqlevelsStyle(peaks) <- seqlevelsStyle(annoData) 27 seqlevelsStyle(peaks) <- seqlevelsStyle(annoData)
28 28
29 anno <- annoPeaks(peaks, annoData=annoData, bindingType =c(input2), bindingRegion=c(input3, input4)) 29 anno <- annoPeaks(peaks, annoData=annoData, bindingType =c(input2), bindingRegion=c(input3, input4))
30 30
31 write.table(anno, file= output1, quote = FALSE, row.names = FALSE, sep = "/t") 31 write.table(anno, file= output1, quote = FALSE, row.names = FALSE, sep = "\t")