bam_file<-system.file("extdata","accepted_hits.bam", package="rbamtools")
idx_file<-system.file("extdata","accepted_hits.bam.bai",package="rbamtools")
reader<-bamReader(bam_file)
align<-getNextAlign(reader)
name(align)
position(align)
loadIndex(reader,idx_file)
index.initialized(reader)
bamClose(reader)
Run the code above in your browser using DataLab