View source: R/repgrid-plots.r
doRectanglesOverlap | R Documentation |
The overlap is assessed in x AND y.
doRectanglesOverlap(a, b, margin = 0)
a |
vector with four coordinates |
b |
vector with four coordinates |
logical
. TRUE if rectangles overlap.
## 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)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.