N1poisUC.RdDensity, and random generation for the (four parameter bivariate) Linear Model–Poisson copula distribution.
dN1pois(x1, x2, mean = 0, sd = 1, lambda, apar = 0,
doff = 5, copula = "gaussian", log = FALSE)
rN1pois(n, mean = 0, sd = 1, lambda, apar = 0,
doff = 5, copula = "gaussian")dN1pois gives the probability density/mass function,
rN1pois generates random deviate and returns
a two-column matrix.
See N1poisson, the VGAM
family functions for estimating the
parameter by maximum likelihood estimation,
for details.
if (FALSE) { # \dontrun{
nn <- 1000; mymu <- 1; sdev <- exp(1)
apar <- rhobitlink(0.4, inverse = TRUE)
lambda <- loglink(1, inverse = TRUE)
mat <- rN1pois(nn, mymu, sdev, lambda, apar)
pndata <- data.frame(y1 = mat[, 1], y2 = mat[, 2])
with(pndata, plot(jitter(y1), jitter(y2), col = 4))
} # }