add_max_targets_met_objective {oppr}R Documentation

Add maximum targets met objective

Description

Set the objective of a project prioritization problem() to maximize the total number of persistence targets met for the features, whilst ensuring that the cost of the solution is within a pre-specified budget (Chades et al. 2015). In some project prioritization exercises, decision makers may have a target level of persistence for each feature (e.g. a 90% persistence target corresponding to a 90% chance for the features persisting into the future). In such exercises, the decision makers do not perceive any benefit when a target is not met (e.g. if a feature has a persistence target of 90% and a solution only secures a 70% chance of persistence then no benefit is accrued for that feature) or when a target is surpassed (e.g. if a feature has a persistence target of 50%, then a solution which secures a 95% chance of persistence will accrue the same benefit as a solution which secures a 50% chance of persistence). Furthermore, weights can also be used to specify the relative importance of meeting targets for specific features (see add_feature_weights()).

Usage

add_max_targets_met_objective(x, budget)

Arguments

x

ProjectProblem object.

budget

numeric budget for funding actions.

Details

A problem objective is used to specify the overall goal of the project prioritization problem. Here, the maximum targets met objective seeks to find the set of actions that maximizes the total number of features (e.g. populations, species, ecosystems) that have met their persistence targets within a pre-specified budget. Let II represent the set of conservation actions (indexed by ii). Let CiC_i denote the cost for funding action ii, and let mm denote the maximum expenditure (i.e. the budget). Also, let FF represent each feature (indexed by ff), WfW_f represent the weight for each feature ff (defaults to one for each feature unless specified otherwise), TfT_f represent the persistence target for each feature ff, and EfE_f denote the probability that each feature will go extinct given the funded conservation projects.

To guide the prioritization, the conservation actions are organized into conservation projects. Let JJ denote the set of conservation projects (indexed by jj), and let AijA_{ij} denote which actions iIi \in I comprise each conservation project jJj \in J using zeros and ones. Next, let PjP_j represent the probability of project jj being successful if it is funded. Also, let BfjB_{fj} denote the enhanced probability that each feature fFf \in F associated with the project jJj \in J will persist if all of the actions that comprise project jj are funded and that project is allocated to feature ff. For convenience, let QfjQ_{fj} denote the actual probability that each fFf \in F associated with the project jJj \in J is expected to persist if the project is funded. If the argument to adjust_for_baseline in the problem function was set to TRUE, and this is the default behavior, then Qfj=(Pj×Bfj)+((1(PjBfj))×(Pn×Bfn))Q_{fj} = (P_{j} \times B_{fj}) + \bigg(\big(1 - (P_{j} B_{fj})\big) \times (P_{n} \times B_{fn})\bigg), where n corresponds to the baseline "do nothing" project. This means that the probability of a feature persisting if a project is allocated to a feature depends on (i) the probability of the project succeeding, (ii) the probability of the feature persisting if the project does not fail, and (iii) the probability of the feature persisting even if the project fails. Otherwise, if the argument is set to FALSE, then Qfj=Pj×BfjQ_{fj} = P_{j} \times B_{fj}.

The binary control variables XiX_i in this problem indicate whether each project iIi \in I is funded or not. The decision variables in this problem are the YjY_{j}, ZfjZ_{fj}, EfE_f, and GfG_f variables. Specifically, the binary YjY_{j} variables indicate if project jj is funded or not based on which actions are funded; the binary ZfjZ_{fj} variables indicate if project jj is used to manage feature ff or not; the semi-continuous EfE_f variables denote the probability that feature ff will go extinct; and the GfG_f variables indicate if the persistence target for feature ff is met.

Now that we have defined all the data and variables, we can formulate the problem. For convenience, let the symbol used to denote each set also represent its cardinality (e.g. if there are ten features, let FF represent the set of ten features and also the number ten).

Maximize f=0FGfWf (eqn 1a)Subject toi=0ICim (eqn 1b)Gf(1Ef)Tf  fF (eqn 1c)Ef=1j=0JZfjQfj  fF (eqn 1d)ZfjYj  jJ (eqn 1e)j=0JZfj×ceil(Qfj)=1  fF (eqn 1f)AijYjXi  iI,jJ (eqn 1g)Ef0,Ef1  bB (eqn 1h)Gf,Xi,Yj,Zfj[0,1]  iI,jJ,fF (eqn 1i) \mathrm{Maximize} \space \sum_{f = 0}^{F} G_f W_f \space \mathrm{(eqn \space 1a)} \\ \mathrm{Subject \space to} \sum_{i = 0}^{I} C_i \leq m \space \mathrm{(eqn \space 1b)} \\ G_f (1 - E_f) \geq T_f \space \forall \space f \in F \space \mathrm{(eqn \space 1c)} \\ E_f = 1 - \sum_{j = 0}^{J} Z_{fj} Q_{fj} \space \forall \space f \in F \space \mathrm{(eqn \space 1d)} \\ Z_{fj} \leq Y_{j} \space \forall \space j \in J \space \mathrm{(eqn \space 1e)} \\ \sum_{j = 0}^{J} Z_{fj} \times \mathrm{ceil}(Q_{fj}) = 1 \space \forall \space f \in F \space \mathrm{(eqn \space 1f)} \\ A_{ij} Y_{j} \leq X_{i} \space \forall \space i \in I, j \in J \space \mathrm{(eqn \space 1g)} \\ E_{f} \geq 0, E_{f} \leq 1 \space \forall \space b \in B \space \mathrm{(eqn \space 1h)} \\ G_{f}, X_{i}, Y_{j}, Z_{fj} \in [0, 1] \space \forall \space i \in I, j \in J, f \in F \space \mathrm{(eqn \space 1i)}

The objective (eqn 1a) is to maximize the weighted total number of the features that have their persistence targets met. Constraints (eqn 1b) calculate which persistence targets have been met. Constraint (eqn 1c) limits the maximum expenditure (i.e. ensures that the cost of the funded actions do not exceed the budget). Constraints (eqn 1d) calculate the probability that each feature will go extinct according to their allocated project. Constraints (eqn 1e) ensure that feature can only be allocated to projects that have all of their actions funded. Constraints (eqn 1f) state that each feature can only be allocated to a single project. Constraints (eqn 1g) ensure that a project cannot be funded unless all of its actions are funded. Constraints (eqns 1h) ensure that the probability variables (EfE_f) are bounded between zero and one. Constraints (eqns 1i) ensure that the target met (GfG_f), action funding (XiX_i), project funding (YjY_j), and project allocation (ZfjZ_{fj}) variables are binary.

Value

ProjectProblem object with the objective added to it.

References

Chades I, Nicol S, van Leeuwen S, Walters B, Firn J, Reeson A, Martin TG & Carwardine J (2015) Benefits of integrating complementarity into priority threat management. Conservation Biology, 29, 525–536.

See Also

objectives.

Examples

# load the ggplot2 R package to customize plot
library(ggplot2)

# load data
data(sim_projects, sim_features, sim_actions)

# manually adjust feature weights
sim_features$weight <- c(8, 2, 6, 3, 1)

# build problem with maximum targets met objective, a $200 budget,
# targets that require each feature to have a 20% chance of persisting into
# the future, and zero cost actions locked in
p1 <- problem(sim_projects, sim_actions, sim_features,
             "name", "success", "name", "cost", "name") %>%
      add_max_targets_met_objective(budget = 200) %>%
      add_absolute_targets(0.2) %>%
      add_locked_in_constraints(which(sim_actions$cost < 1e-5)) %>%
      add_binary_decisions()

## Not run: 
# solve problem
s1 <- solve(p1)

# print solution
print(s1)

# plot solution, and add a dashed line to indicate the feature targets
# we can see the three features meet the targets under the baseline
# scenario, and the project for F5 was prioritized for funding
# so that its probability of persistence meets the target
plot(p1, s1) +
geom_hline(yintercept = 0.2, linetype = "dashed")

## End(Not run)

# build another problem that includes feature weights
p2 <- p1 %>%
      add_feature_weights("weight")

## Not run: 
# solve problem
s2 <- solve(p2)

# print solution
print(s2)

# plot solution, and add a dashed line to indicate the feature targets
# we can see that adding weights to the problem has changed the solution
# specifically, the projects for the feature F3 is now funded
# to enhance its probability of persistence
plot(p2, s2) +
geom_hline(yintercept = 0.2, linetype = "dashed")

## End(Not run)

[Package oppr version 1.0.4 Index]