get_objective {restoptr}

Retrieve the optimization objective of a restopt problem.

Description

Retrieve the optimization objective of a restopt problem.

Usage

get_objective(problem)

Arguments

problem

restopt_problem() Restoration problem object.

Value

RestoptObjectve The optimization objective of the restopt problem.

Examples

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

# create problem
problem <- restopt_problem(
       existing_habitat = habitat_data,
       aggregation_factor = 4,
       habitat_threshold = 0.7
)

get_objective(problem)