aspmPENLL | R Documentation |
aspmPENLL is a penalized negative log-likelihood for normally distributed data, set-up for use with the ASPM model fitting. It would be necessary to log-transform the original data to convert log-normal data to normal. The assumption is made that there will be three parameters, the unfished R0, the initial depletion in the first year. For use with initially depleted stocks
aspmPENLL(par, infish, inglb, inprops)
par |
a vector of two numbers the hypothesized inR0 and the initial depletion in the first year. (in that order). |
infish |
the fish data.frame from readdata or built in dataset |
inglb |
the glb data.frame from readdata or built in dataset |
inprops |
the props data.frame from readdata or built in dataset |
a scalar that is the negative log-likelihood using normal random errors
## Not run:
data(dataspm)
fish <- dataspm$fish
glb <- dataspm$glb
props <- dataspm$props
pars <- c(13.53,0.190667,0.95) # assume the stock is known to have been
aspmLL(pars,infish=fish,inglb=glb,inprops=props) # initially depleted
aspmPENLL(pars,infish=fish,inglb=glb,inprops=props) # penalty approaching 1
pars <- c(13.53,0.190667,0.85) # depletion away from 1.0 has almost no effect
aspmLL(pars,infish=fish,inglb=glb,inprops=props)
aspmPENLL(pars,infish=fish,inglb=glb,inprops=props)
## End(Not run)
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.