powered by
Check if the inputs are valid tabix range such as chr1:2-300
isTabixRange(range)
characer vector
valid <- isTabixRange(c("chr1:1-200", "X:1", "1:100-100", "chr1", "1:1-20,1:30-40")) stopifnot(all(valid)) invalid <- isTabixRange(c(":1", "chr1::", ":-")) stopifnot(all(!invalid))
Run the code above in your browser using DataLab