plotceASPM | R Documentation |
plotceASPM plots just the fit of the ASPM model to the CPUE data and provides a more detailed visual than plotASPM. It has the option of including lognormal confidence intervals around the predcted CPUE.
plotceASPM(infish, CI = NA, defineplot = TRUE)
infish |
output from the dynamics function using the optimum parameters |
CI |
the output matrix from getLNCI function. Needs to have the lower CI in column 1 and the upper CI in the third column. |
defineplot |
defaults to TRUE, determines whether to set up an new graphics window. |
returns nothing but does plot a graph
## Not run:
data(dataspm)
fish <- dataspm$fish
glb <- dataspm$glb
props <- dataspm$props
pars <- c(14,0.3)
aspmLL(pars,fish,glb,props) # should be -2.277029
bestspm <- fitASPM(pars,infish=fish,inglb=glb,inprops=props)
fishery <- dynamics(bestspm$par,fish,glb,props)
ceCI <- getLNCI(fishery[,"PredCE"],bestspm$par[2])
plotceASPM(fishery,CI=ceCI)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.