View source: R/pCountOpenFFT.R
pCountOpenFFT | R Documentation |
Fit an open population N-mixture model using the FFT method of computing the Transition Probability matrix. The four parameters are mean initial site abundance lambda, mean recruitments gamma, survival probability omega, and probability of detection pdet. Parameters can be made to vary over sites and over times by including parameter covariates. Note that this function is essentially a wrapper for optim acting on the nll_FFT function.
pCountOpenFFT( nit, K = NULL, starts = NULL, l_s_c = NULL, g_s_c = NULL, g_t_c = NULL, o_s_c = NULL, o_t_c = NULL, p_s_c = NULL, p_t_c = NULL, VERBOSE = FALSE, outfile = NULL, method = "BFGS", ... )
nit |
Matrix of counts data. Rows represent sites, columns represent sampling occasions. Note that if the data is a vector, then it will be converted to a matrix with a single row. |
K |
Upper bound on summations in the likelihood function. K should be chosen large enough that the negative log likelihood function is stable (unchanging as K increases). If K=NULL, K=5*max(nit) will be used as default. Default: NULL |
starts |
Either NULL for default starting values, or a vector of parameter values: |
l_s_c |
List of lambda site covariates, Default: NULL |
g_s_c |
List of gamma site covariates, Default: NULL |
g_t_c |
List of gamma time covariates, Default: NULL |
o_s_c |
List of omega site covariates, Default: NULL |
o_t_c |
List of omega time covariates, Default: NULL |
p_s_c |
List of pdet site covariates, Default: NULL |
p_t_c |
List of pdet time covariates, Default: NULL |
VERBOSE |
If TRUE, will print additional information during model fitting, Default: FALSE |
outfile |
Location of csv file to write/append parameter values, can be used to checkpoint long running model fits. Default: NULL (no csv file created). |
method |
Optimization method, passed to optim function, options include: "BFGS", "Nelder-Mead", "CG". Default: "BFGS" |
... |
Additional arguments passed to the optimization function optim. For example: |
Returns the fitted model object.
if (interactive()) { # No Covariates nit = matrix(c(1,1,0,2,3), nrow=1) # observations for 1 site, 5 sampling occassions model1 = pCountOpenFFT(nit, K=10) # fit the model with population upper bound K=10 # Site Covariates o_s_c = list(cov1=c(0,0,1)) # omega site covariates, cov1 is categorical nit = matrix(c(1,1,0,2,3, 1,0,1,3,2, 4,1,3,2,0), nrow=3, byrow=T) # 3 sites, 5 sampling occassions model2 = pCountOpenFFT(nit, K=20, o_s_c=o_s_c) # fit the model with population upper bound K=20 # Time Covariates g_t_c = list(temp=c(0.5,0.3,0.6,0.7,NA)) # transition covariates: only first T-1=4 values used model3 = pCountOpenFFT(nit, K=10, g_t_c=g_t_c) # fit the model with population upper bound K=10 }
Add the following code to your website.
For more information on customizing the embed code, read Embedding Snippets.