OpenRepGrid (version 0.1.9)

doRectanglesOverlap: 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 c(x0,y0,x1,y1).

b

vector with four coordinates c(x0,y0,x1,y1).

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)