Dear all,
I am a first-year PhD student in the process of building an IPM using count, productivity, and capture-recapture data sets spanning 11 years, and I am currently working on the population. model. The count data was collected by visiting the point survey locations once every year. I have been using the Michael Schaub and Marc Ke´ry textbook on IPM to learn about the IPMs and it has been very helpful.
I have a couple of questions regarding my count data and the specification of the population model, especially the observation model in JAGS.
1. Since my count data does not have replicated counts (i.e., each point survey site was visited only once per year), is it appropriate to use N-mixture models for my population model? I am of the understanding that N-mixture models are mostly used for replicated counts and it appears I only have spatial replicates with one-time visitation per point site location. Should I consider a different model entirely?
2. My count data follows a negative binomial distribution which means my observation model needs to be specified to follow a negative binomial, however, I am unable to specify the observation model correctly. The output I have from my analysis is giving me weird credible intervals with a range starting from 0.000.
I am hoping someone on this mailing list could provide guidance about what to do with the kind of count data I have and also take a look at my code and help me identify what I have done wrong and how I could get it right. Also, I am open to suggestions on resources I could use to successfully build my IPM, especially when counts follow a negative binomial distribution.
Below is the code snippet for my model specification: I am not entirely sure if what I have done is correct.
cat(file = "model2.txt", "
model {
# Priors and linear models :Vague priors
r ~ dgamma(1, 0.1) # Dispersion parameter for negative binomial
gamma ~ dunif(0, 10) # Expected abundance in year 1
phi ~ dunif(0, 1) # Apparent survival (probability)
rho ~ dunif(0, 1) # Per-capita recruitment rate
p ~ dunif(0, 1) # Success probability
# Population dynamics model
for (i in 1:nsite) {
N[i,1] ~ dpois(gamma) # Initial population size with Poisson prior
for (t in 2:nyear) {
S[i,t] ~ dbinom(phi, N[i,t-1]) # Survivors
R[i,t] ~ dpois(N[i,t-1] * rho) # Recruits
N[i,t] <- S[i,t] + R[i,t] # Population size at time t (i.e Abundance)
}
}
# Observation process
for (i in 1:nsite) {
for (t in 1:nyear) {
C[i,t] ~ dnegbin(p, r) # Negative binomial observation model
}
}
# Derived quantities
for (t in 1:nyear) {
ntot[t] <- sum(N[,t]) # Total abundance across all sites at time t
}
}
")
Thanks,