Add Bounding Boxes to an Existing Plot

This function overlays bounding boxes onto an existing plot.

Usage

plot_bbox(bbox_list, col = "red")

Arguments

bbox_list

A list of bounding boxes, as returned by object_bbox().

col

The color for the bounding boxes. Defaults to "red".

Value

None (adds bounding boxes to an existing plot).

Examples

if(interactive()){
plot(NA,
    xlim = c(0, 200),
    ylim = c(0, 200),
    asp = 1)
contours <- list(
  matrix(c(10, 20, 30, 40, 50, 60, 70, 80, 90, 100,
           110, 120, 130, 140, 150, 160, 170, 180, 190, 200),
         ncol = 2, byrow = FALSE)
)
bbox_list <- object_bbox(contours)
plot_bbox(bbox_list)
}