interval_union(
interval(c(0, 1), closed = TRUE),
interval(c(1, 2))
)
interval_union(
interval(c(0, 5)),
interval(c(1, 4), closed = TRUE)
)
# Convex union is not equal to set union:
interval_union(
interval(c(0, 1)),
interval(c(2, 3))
)
# The empty union is {}
interval_union()
interval_intersection(
interval(c(0, 1)),
interval(c(0.5, 2))
)
interval_intersection(
interval(c(0, Inf)),
interval(c(-Inf, 0))
)
interval_intersection(
interval(c(0, Inf), include_lowest = TRUE),
interval(c(-Inf, 0), include_highest = TRUE)
)
interval_intersection(
interval(c(0, 5)),
interval(c(1, 6), closed = TRUE)
)
# The empty intersection is (-Inf, Inf)
interval_intersection()
Run the code above in your browser using DataLab