chapmanRobson(x, ...)
## S3 method for class 'default':
chapmanRobson(x, catch, ages2use = age,
zmethod = c("Smithetal", "Hoenigetal", "original"), ...)
## S3 method for class 'formula':
chapmanRobson(x, data, ages2use = age,
zmethod = c("Smithetal", "Hoenigetal", "original"), ...)
## S3 method for class 'chapmanRobson':
summary(object, verbose = FALSE, ...)
## S3 method for class 'chapmanRobson':
confint(object, parm = c("all", "both", "S", "Z"),
level = conf.level, conf.level = 0.95, ...)
## S3 method for class 'chapmanRobson':
plot(x, pos.est = "topright", cex.est = 0.95,
ylab = "Catch", xlab = "Age", col.pt = "gray30", ...)
catch~age
when used in chapmanRobson
. An object saved from chapmanRobson
(i.e., of class chapmanRobson
) when used in tx
is a formula.x
formula can be found. Not used if x
is not a formula.chapmanRobson
call (i.e., of class chapmanRobson
).FALSE
; default) or a more verbose statement.conf.level
. Used for compatability with the generic confint
function."bottomright"
, "bottom"
, "bottomleft"
, "left"
, "topleft"
, "top"
, "topr
"Catch"
is the default)."Age"
is the default).agesurv
in rockbass
data.frame in ages2use
to isolate only the catch and ages on the descending limb.
The Chapman-Robson method provides an estimate of the annual survival rate, with the annual mortality rate (A) determined by 1-S. The instantaneous mortality rate is often computed as -log(S). However, Hoenig et al. (1983) showed that this produced a biased (over)estimate of Z and provided a correction. The correction is applied by setting zmethod="Hoenigetal"
. Smith et al. (2012) showed that the Hoenig et al. method should be corrected for a variance inflation factor. This correction is applied by setting zmethod="Smithetal"
(which is the default behavior). Choose zmethod="original"
to use the original estimates for Z and it's SE as provided by Chapman and Robson.agesurv
in catchCurve
and agesurvcl
in metaM
for empirical methods to estimate natural mortality.data(BrookTroutTH)
plot(catch~age,data=BrookTroutTH,pch=19)
## demonstration of formula notation
cr1 <- chapmanRobson(catch~age,data=BrookTroutTH,ages2use=2:6)
summary(cr1)
summary(cr1,verbose=TRUE)
confint(cr1)
plot(cr1)
## demonstration of excluding ages2use
cr2 <- chapmanRobson(catch~age,data=BrookTroutTH,ages2use=-c(0,1))
summary(cr2)
plot(cr2)
## demonstration of ability to work with missing age classes
age <- c( 2, 3, 4, 5, 7, 9,12)
ct <- c(100,92,83,71,56,35, 1)
cr3 <- chapmanRobson(age,ct,4:12)
summary(cr3)
plot(cr3)
Run the code above in your browser using DataLab