Description Usage Arguments Details Value Author(s) Examples
Plots decision graph of the solution to the problem : When to stop managing or surveying cryptic threatened species ?
1 | graph(p0, pm, d0, dm, ds, V, Cm, Cs, state_prior, disc=0.95, size = 1)
|
p0 |
Local probability of persitance : P(extant/extant, survey or stop). |
pm |
Local probability of persitance if manage : P(extant/extant, manage). |
d0 |
Local probability of detection : P(present/extant, stop). |
dm |
Local probability of detection : P(present/extant, manage). |
ds |
Local probability of detection if survey : P(present/extant, survey). |
V |
Estimated economic value of the species ($/yr). |
Cm |
Estimated cost of managing ($/yr). |
Cs |
Estimated cost of survey ($/yr). |
state_prior |
Initial belief state, vector of 2 values (belief state extant and extinct), between 0 and 1. |
disc |
Discount factor used to compute the policy (default 0.95) |
size |
Size of the text on the graph (default 1) |
This function solves the main problem by calling the sarsop solver for POMDP.
Plot.
Luz Pascal
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 | ## Not run:
#values for Sumatran tigers
pen <- 0.1
p0 <- 1-pen
pem <- 0.05816
pm <- 1 - pem
V <- 175.133
Cm <- 18.784
Cs <- 10.840
d0 <- 0.01
dm <- 0.01
ds <- 0.78193
#Initial belief state
state_prior <- c(0.9,0.1) #extant : 0.9, extinct : 0.1
graph(p0, pm, d0, dm, ds, V, Cm, Cs, state_prior)
## End(Not run)
|
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.