rposbern(n, nTimePts = 5, pvars = length(xcoeff), xcoeff = c(-2, 1, 2),
         Xmatrix = NULL, cap.effect = 1, is.popn = FALSE,
         link = "logit", earg.link = FALSE)
dposbern(x, prob, prob0 = prob, log = FALSE)posbernoulli.b
  and posbernoulli.t.is.popn.TRUE then argument n is the population size
  and what is returned may have substantially less rows than n.
  That is, if an animal has at least one one in its sequence then
  it is returned, else that x1, 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.CommonVGAMffArguments.rposbern returns a data frame with some attributes.
  The function generates random deviates
  ($\tau$ columns labelled y1, y2, ...)
  for the response.
  Some indicator columns are also included
  (those starting with ch are for previous capture history).
  The default setting corresponds to a $M_{bh}$ model that
  has a single trap-happy effect.
  Covariates x1, x2, ...have the same
  affect on capture/recapture at every sampling occasion
  (see the argument parallel.t in, e.g.,
  posbernoulli.tb).  The function dposbern gives the density,
posbernoulli.b and/or
  posbernoulli.t and/or
  posbernoulli.tb.
  The denominator is equally shared among the elements of
  the matrix x.posbernoulli.tb,
  posbernoulli.b,
  posbernoulli.t.rposbern(n = 10)
attributes(pdata <- rposbern(n = 100))
M.bh <- vglm(cbind(y1, y2, y3, y4, y5) ~ x2 + x3, posbernoulli.b(I2 = FALSE),
             data = pdata, trace = TRUE)
constraints(M.bh)
summary(M.bh)Run the code above in your browser using DataLab