powered by
isOpen(con,rw="")
library(rbamtools) bam_file <- system.file("extdata", "accepted_hits.bam", package="rbamtools") reader<-bamReader(bam_file) isOpen(reader) align<-getNextAlign(reader) bamClose(reader) isOpen(reader)
Run the code above in your browser using DataLab