add_connected_constraint: Add constraint to ensure that the selected planning units for...

In restoptr: Ecological Restoration Planning

Add constraint to ensure that the selected planning units for restoration are connected.

Description

Add constraint to a restoration problem (restopt_problem()) object to specify the selected planning units are connected

Usage

add_connected_constraint(problem)

Arguments

problem

restopt_problem() Restoration problem object.

Details

A connected area is such that there is a path between any to planning units within the area. This constraints applies on the set of planning units that are selected for restoration. In practice, this constraint is useful to ensure the feasibility of a restoration project, and to integrate economies of scale. Connected restoration areas are usually associated with lower costs, because it ensures that restoration sites are not too far away from each other (e.g. lower travel costs between sites, less areas to monitor, etc.). Note This constraint relies on the add_components_constraint(), with parameters set to enforce exactly one connected component. Also see add_components_constraint and add_compactness_constraint.

Value

An updated restoration problem (restopt_problem()) object.

See Also

Other constraints: add_available_areas_constraint(), add_compactness_constraint(), add_components_constraint(), add_locked_out_constraint(), add_min_iic_constraint(), add_min_mesh_constraint(), add_nb_patches_constraint(), add_no_new_patch_constraint(), add_restorable_constraint()

Examples

## Not run: 
# load data
habitat_data <- rast(
  system.file("extdata", "habitat_hi_res.tif", package = "restoptr")
)

# create problem
p <- restopt_problem(
    existing_habitat = habitat_data,
    aggregation_factor = 16,
    habitat_threshold = 0.7
  ) %>%
  add_restorable_constraint(
    min_restore = 10,
    max_restore = 100,
  ) %>%
  add_connected_constraint()

# plot preprocessed data
plot(rast(list(p$data$existing_habitat, p$data$restorable_habitat)), nc = 2)

# print problem
print(p)

# Solve problem
s <- solve(p)
# plot solution
plot(s)

## End(Not run)

restoptr documentation built on Aug. 12, 2025, 1:08 a.m.