rhuggins91(n, nTimePts = 5, pvars = length(xcoeff), xcoeff = c(-2, 1, 2),
capeffect = -1, double.ch = FALSE,
link = "logit", earg = list())
dhuggins91(x, prob, prob0 = prob, log = FALSE)
huggins91
.TRUE
then the values of ch0
, ch1
, ...are
2 or 0, else 1 or 0.
Setting this argument TRUE
means that a model can be fitted
with half the capture history in both denominator and numeratx1
, x2
, ...,
where the first is an intercept, and the others are
independent standard runif<
x1
, x2
, ...,
and the first is for the intercept.
The length of xcoeff
must be at least pvars
.dhuggins91
gives the density,
rhuggins91
returns a data frame with some attributes.
The function generates random deviates
($T$ columns labelled y1
, y2
, ...)
for the response.
Some indicator columns are also included
(those starting with ch
are for previous capture history,
and those starting with z
are zero),
and these are useful for the xij
argument.huggins91
.huggins91
.set.seed(123); rhuggins91(n = 10)
set.seed(123); rhuggins91(n = 10, double.ch = TRUE)
attributes(rhuggins91(n = 10))
Run the code above in your browser using DataLab