getCurTrackViewport(curViewerStyle, start, end)
trackViewerStyle
viewport
addGuideLine
vp <- getCurTrackViewport(trackViewerStyle(), 10000, 10200) addGuideLine(c(10010, 10025, 10150), vp=vp)
Run the code above in your browser using DataLab