Multi-session model

107 views
Skip to first unread message

Hugh Davies

unread,
Aug 9, 2020, 9:39:28 PM8/9/20
to secr...@googlegroups.com, Murray Efford

Hi there,

 

I am trying to estimate the density of native mammal species at four locations in northern Australia. These four locations are independent so I set up a multi-session capthist object to investigate which session specific covariate best explains any differences in density. My data for each of the four locations comes from two surveys (each of the two surveys consisted of four nights/occasions of live-trapping): the first survey was conducted in June 2019, the second survey was conducted in September 2019. It is likely the g0 and sigma vary between the two survey times as animals make larger movements later in the year as the dry season progresses.

 

I’m am a bit unsure on how best to model the potential difference in g0 and sigma between the two survey times and just wanted to double check that I’m on the right track..

 

I’ve attached my script and files, any advice would be much appreciated!

 

Cheers

Hugh

SECR 1.R
CF possum all.txt
CP possum all.txt
P possum all.txt
R possum all.txt
CF traps.txt
CP traps.txt
P traps.txt
R traps.txt

Murray Efford

unread,
Aug 9, 2020, 10:07:04 PM8/9/20
to secr
Hi Hugh
Looking at your data, it seems you have concatenated occasions from the two surveys at each site, giving 8 occasions at each. The 'T' predictor relates to a linear trend across occasions on the link (logit) scale, which is probably not what you intend*. You can model a step change with a factor time covariate to fit one g0 (and/or sigma) for the first 4 occasions and another for the second 4 occasions. I guess you are happy to assume constant density across surveys. It might be more flexible and transparent to treat the data as 8 separate sessions (4 sites x two times); this does not acknowledge the continuity of the population at each site (same animals, probably same centres) that has an effect (probably minor) on the reported SE.
Murray

* although it actually gave a lower AIC than this model:
fit_CR_Fire2 <- secr.fit(CH, mask = mask, trace = TRUE, sessioncov = sesscov, verify = FALSE,
 model
= list(D ~ Fire, g0 ~ tcov, sigma ~ tcov), timecov=c(1,1,1,1,2,2,2,2))


Reply all
Reply to author
Forward
0 new messages