# NOT RUN {
i1 <- new("Interval", start=1.1, end=1.2, key="dummy")
isOverlap(i1, c(1.0, 1.5))
isOverlap(i1, 1.0)
# }
# NOT RUN {
isOverlap(i1, c(2.0, 1.5)) # generate an error
isOverlap(i1, c(1.0, 1.5, 2)) # generate an error
# }
Run the code above in your browser using DataLab