interval_intersection(list(c(1.2,1.5), c(2.3,2.7)),
list(c(0.6,1.4), c(2.5,3.6), c(6.3,6.9)))
interval_intersection(list(c(-0.3,0.55), c(2.35,2.8)),
list(c(0.54,0.62), c(2.5,2.9)))
interval_intersection(list(c(0,1)), list(c(1,2)))
interval_intersection(list(c(0,1+1e-8)), list(c(1,2)))
interval_intersection(list(c(0,1), c(2,3)),
list(c(1,2)))
interval_intersection(list(c(0,1+1e-8), c(2-1e-8,3)),
list(c(1,2)))
interval_intersection(list(c(0,1)), list())
Run the code above in your browser using DataLab