doRectanglesOverlap {OpenRepGrid} | R Documentation |
Detect if two rectangles overlap.
Description
The overlap is assessed in x AND y.
Usage
doRectanglesOverlap(a, b, margin = 0)
Arguments
a |
vector with four coordinates |
b |
vector with four coordinates |
Value
logical
. TRUE if rectangles overlap.
Examples
## Not run:
# overlap in x and y
a <- c(0, 0, 2, 2)
b <- c(1, 1, 4, 3)
plot(c(a, b), c(a, b), type = "n")
rect(a[1], a[2], a[3], a[4])
rect(b[1], b[2], b[3], b[4])
doRectanglesOverlap(a, b)
# b contained in a vertically
a <- c(5, 0, 20, 20)
b <- c(0, 5, 15, 15)
plot(c(a, b), c(a, b), type = "n")
rect(a[1], a[2], a[3], a[4])
rect(b[1], b[2], b[3], b[4])
doRectanglesOverlap(a, b)
# overlap only in y
a <- c(0, 0, 2, 2)
b <- c(2.1, 1, 4, 3)
plot(c(a, b), c(a, b), type = "n")
rect(a[1], a[2], a[3], a[4])
rect(b[1], b[2], b[3], b[4])
doRectanglesOverlap(a, b)
## End(Not run)
[Package OpenRepGrid version 0.1.16 Index]