## a simple example
scen1 <- make.scenarios(D = c(5,10), sigma = 25, g0 = 0.2, noccasions =
c(5,10))
traps1 <- make.grid() ## default 6 x 6 trap grid
tmp1 <- run.scenarios(nrepl = 2, trapset = traps1, scenarios = scen1,
fit.args = list(model=g0~b), fit = TRUE, extractfn = coef)
## selecting one coefficient (i.e. one row in coef table)
summary(tmp1, parameter = 'g0.bTRUE')summary(select.stats(tmp1, parameter='g0.bTRUE'))